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ABSTRACT 



CP/M-E6 is a microcomputer (INTEL ECS6) operating system 
developed, and mariceted by Digital Researcn. Tne operating 
system is designed sc tnat a user can adapt tne system to 
nis own input/output hardware devices. This thesis develops 
interfaces to two floppy dis£ controllers, tne iSBC 2i'l 
(single densitv) and tne iSBC 2X2 (double density) 
controllers. Tie interface includes tne writing of a boot 
loader embedded in tne iSBC 9b7 Execution Vehicle Monitor, 
tne monitor system for tne INTEL iSBC 36/12 single board 
computer. Also included is an interface module for tne cold 
start loader (loader 3I3S} ana an input and output 
interface, BIOS. A design for tne interface module of 
typical systems based on Winchester technology hard disis is 
also presented. 
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I. INTRODUCTION 



A. PURPOSE OF THIS THESIS 

Tne adaptation of CP/M-86 to tne Hardware aescnoed 
Herein was undertaken to provide an operating system for 
8286 processor based single board computers at tne Naval 
Postgraduate Scnooi. Inis operating system will support 
software development and system emulation for tne AEGIS 
modeling project. Tne software will be available for general 
use at NPS. In addition tne experience of modifying an 
operating system provided tne autnor witn an opportunity to 
learn about microcomputer Hardware and microcomputer 
operating systems . 

3. HISTORY OF MICROCOMPUTER OPERATING SYSTEMS 

Tni s is a brief overview of tne nistory of mi crocomnuter 
operating systems summarized from Ref. 1. It is necessarily 
brief as tne advent of microcomputer operating systems is 
itself ratner recent. Microcomputers came of age witn tne 
construction of tne entire central processor on one cnip, 
tne replacement of core memory witn inexpensive mass 
produced semiconductor memory, tne availability of tne 
floppy disk and tne standardization of diskette format. At 
first, tne primary applications of microcomputers were in 
real-time control systems sucn as macnine controlled tools. 
In sucn applications, process management is tne main tnrust 
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ani system I/O is negligible. Tms required a simple, 
customized operating syster. Tne first microcomputer 
operating systems, more properly caileo executive systems, 
were for real time applications. As microcomputer systems 
became less expensive, it became possicie to devote a system 
to a single user as a program development tool. Tr.is use 
presented tne need for nigner level language support, wnicn 
meant that an operating system nad to interface one or more 
programming ianguage(s) to tne nardware. Several 
microcomputer manufacturers nave produced tneir own 
operating systems. Tnese operating systems are specifically 
designed for a "computer system" and are generally not user 
conf igura Die . 

Unlifce tne large, powerful operating systems found in 
mainframe ani large minicomputer times.naring systems, 
microcomputer operating systems are relatively austere and 
simple. One of tne primary reasons for tnis difference is 
t.nat a microcomputer is usually a single user system (wit.n 
some exceptions). As a result, tne operating system does not 
need to provide features sucn as memory protection, process 
scnedulin? and time snaring of tne CPU(s). Besides tne 
simpler interface required of a microcomputer operating 
system, tne operating system and tne applications programs 
must function in a small amount of primary storage, 
typically between lbK ani b4:K , as compared to several 
megabytes in tne large mainframes. Even tnougn relatively 
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small and simple, a microcomputer operating system must 
still provide file management, process management and I/O 
managemen t . 

Two representative microcomputer operating systems are 
INTEL 's ISIS-II and Digital Researcn's CP/M-50. To operate 
under ISIS, tne user requires a minimum of .3PK of primary 
storage. Tne CP/M user requires a minimum of 16tC. Botn 
nrovide tne basic functions required of an operating system. 
ISIS, nowever, will only run on an INTEL computer system 



configuration 


and 


is 


not 


user modifyabl 


e. CP/M-80 is 


designed to run 


on 


any 


84)80 


or Z-84) based 


microcomputer 


system after 


tne 


user 


nas 


modified tne 


program module 


containing tne 


naraware 


dependencies. Tnis 


factor alone 



mates CP/M popular and nas resulted in tne production of 
many CP/M compatible utility and application programs by 
otner companies. ISIS nas some features Deyonc tnose of CP/M 
in tne area of deveionment software for INTEL naraware. 
CP/M's dynamic debugger (DDT), nowever, is more powerful ar.d 
easier to use tnan INTEL'S ICE system. Botn ISIS and C ? / M 
support essentially tne same file operations. Currently, 
because of its flexibility, CP/M is tne most widely used 
microcomputer operating system. 

Multi -user systems sucn as M P./M and microcomputer 
network systems sucn as CP/NET (botn produced by Digital 
Eesearcn), are now available. 



C. ADAPTATION TO THE USER'S ENVIRONMENT 

Digital Researcn nas attempted to maxe tr.eir CP/'i 
operating systems as flexible, in terms of Hardware suite, 
as possiole. The method used is moiuiar programming. Tne 
user interface, tne Console Command Processor (COP) r.as no 
nariware dependencies otner tr.an tne CPU. Tne file 
management system, tne Basic Distf Operating System (BEOS), 
is also independent of Hardware. Botn tne COP and tne 3DCS 
are interfaced to tne Basic Input/Output System (BIOS) 
tr.rougn logical I/O devices and logical disK devices. Tne 
BIOS, tnen, contains tne logical device to pnysicai device 
translation routines. Adaptation of tne operating system to 
a unique environment requires only tne modification of tr.e 
appropriate BIOS routines, greatly simplifying tne 
alteration process. 

Ones one nas successfully completed one adaptation, 
follow-on adaptations will De muen easier to acnieve as an 
understanding of tne operating system and its interface 
procedures is developed along witn a oetter understanding of 
microcomputer arcnitecture in general. 

D. ORGANIZATION OF THIS THESIS 

Tnis tnesis is organized as a ciuepnnt for alteration 
of tne CP/M-d5 operating system to any specific Hardware 
configuration. Tnis metnodoiogy win also serve, at least lr. 
general, for tne alteration of any operating 
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sys tern- to-na rdware interface. Caapter l is a brief 
introduction to microcomputer operating s ys tens in gene ra 1 
and tne modification of tne CP/M-b6 operating system in 
oarticuiar. Cnapter 2 reflects tne investigation of tne 
candidate operating system in order to understand now to 
adapt it to tne existing nardware. Cnapter ^ is a summary of 
tne study of tne typical floppy dis£ or Wincnester 
tecnnology diss and a looi at possime nardware ~anaidates. 
Cnapter 4 covers tne adaptation of tne I/O interface module 
(BIOS) and tne bootstrap program for tnese versions of tne 
operating system. Cnapter 5 discusses some of tne 
difficulties encountered and a plan for adapting CP/M-t6 to 
a card disic. Tne appendices contain tne programs developed 
as part of tnesis and one of tne programs wnicn was used as 
a model. 
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II . STRUCTURE.’ OF CP/ v -5b 



i. &■* 

CF/^-Bb is a microcomputer operating system for INTEL 
CORPORATION'S 3036 processor based mi c roc ompu te rs . It is me 
logical successor to CP/ V -B£, a sirnilar operating- system 
developed and marxeted by Digital Researcn for tne INTEL 
30 30 processor. File compa tibiiity nas oeen preserved wi tn 
ail previous versions of CP/'I. CP/Y provides a general 
environment for program construction, storage, editing-, 
execution and debugging. Tne file structure of version 2 of 
CF/'i-S 2 is used, allowing as many as sixteen drives witn up 
to eignt megabytes on eacn drive. 

CP/y-Sb offers built-in utility commands, system 
transient commands and tne capability of executing user 
defined transient commands (programs). Among tne system 
transient programs are an Intel compatible assembler (AS V B6) 
and a dynamic macnine language prog-ram debugger (DDT). Tn°y 
are described in detail in Digital Researcn's publications 
[Ref. 2] and [Ref. respectively. 

A powerful feature of CP/IE is its modularity. One of tne 
tnree modules of tne operating system, tne 3asic I/O System 
(BIOS), defines tne nardware environment for tne system. As 
a result of tnis modularity, CP/.d-Bb can be modified to run 
on any 3035/3033 processor based, single processor computer 
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system by merely changing tne BIOS. A more detailed 
description of CP /M and its features is contained in Digital 
Research's publications [Ref. 4], [Ref. 5J and [Ref. 5] . 

3. ORGANIZATION OF CP/ y -S6 

The sources of CP/M-eb information for this paper are 
[Ref. 4] , [Ref. 5J and [Ref. 6J . Tnis chapter freely 

summarizes tne relevant material to tnis thesis. 

Tne operating system is contained in file "CPM.SYS”. 
"CPM.SYS" contains three program modules: tne Console 
Command Processor (CCP), tne Basic Disit Operating System 
(EDOS), and the user-conf igura Die Basic Input/Output System 
(BIOS). Tnis modularity allows tne CC? and EDOS to oe 
independent of the hardware in whicn the system is 
implemented . 

The CCP is tne system's interface to tne user's console. 
It translates tne user's commands into CP/M system calls in 
order to carry out tne desired action. Tne EDOS module 
provides all tne dist and file management. Tne BIOS contains 
all 'tne hardware dependent features and interfaces. The 
operating system executes in any portion of memory above tne 
interrupt locations, wnile tne remainder of tne address 
space is partitioned into as many as eight non-con tiguous 
regions, as defined in a table in tne BIOS. 

CP/M-B6 is too large a program to fit in tne first two 
(system) traces of a diskette. As a result the boot loader 
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loads into memory a cold start loader, called "LOADER . CMD" , 
from tne first two tracis. Tne coot loader maies tne 
appropriate initializations ano tnen transfers program 
control to tne cold start loader. Tne cold start leader, 
wnicn is essentially a subset of "CPM.SYS", finds "CPM.SYS" 
on tne system disic, loads it into memory, maxes tne proper 
initializations, and finally transfers control to tne 
operating system. 

C. CCP £ T JI LT-I N A TRANSIENT COMMANDS 

Tne operation of CP/M-96 is similar to tnat of CP/M-8X. 
Upon cold start tne operating systen siens on and drive A is 
logged-in, CP/M-96 tnen waits for an input command line. 
There are five built in commands: 

DIR - displays tne directory of tne designated drive 

ERA - erases tne specified directory entry on tne 
designated drive 

REN - renames tne designated file 

TYPE - tyres tne designated file to tne loaical console 
device 

USSR - cnanges user directories in multi-directory 
systems 

Also tne command line mav begin with tne name of a 
transient program with tne assumed file type of CMD . CMD 
stands for "command file" and is used to differentiate 
CP/M-S6 transient command files from COM files under CP/M-90 
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wnicn serve tne seme purpose. Transient programs are loaned 
into memory in t.oe Transient Program Area(s) (TPA), as 
defined in tne BIOS, in stacx order. 

CF/M-Bb supports programs written in tnree memory 
models: tne 3090 moiei, tne Small model and tne Compact 
model . 

Tne 8090 model supports programs wnicn are directly 
translated from CP/^-80 wnen code and data areas are 
intermixed. Tne model consists only of a code ^roup wnicn, 
in turn, is normally a single segment of b4K or less. Tne 
operating system and tne cold start loader are written in 
tne 8030 model. 

Tne Small model suoports programs wr.ere tnere is a 
separate code and data group. Normally tne Small model 
programs are b^X or less. 

Tne Compact model occurs wnen any of tne extra, stacx or 
auxiliary groups are present in tne program. Eacn group may 
consist of one or more segments. 

Tne tnree models differ primarily in tne manner in wnicn 
tne segment registers are initialized upon transient program 
loading. Tne operating system's program load function 
determines tne memory model used py tne transient program ry 
examining tne program group used. All tnree models are 
discussed in more detail in tne next section. 
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Tran si e nt Pr o.er am Execution Yodels 



Tne initial values of tne sement registers are 
determined by tne ""eitory monel" of tne transient program 
and are described in tne C M D file r.eaier generated ty tne 
program "GENCYD . CYD” cr "GEM C v D . COY" . Tne tnree monels are 
depicted m Firure l. 



! 80 80 Yodel ! Code and Tata Groups Overlap ' 

! Small ^odel ! Independent Code & L'a ta Groups ! 

! Compact M ooei ! Tnree or More Independent Groups ! 

Figure 1 Transient Program Memory Yooeis. 
a. Ttie 8U8V Yodel 

Tne 3080 Yodel is assumed wnen tne transient 
program contains only a code ?roup (containing do tn cone and 
data). In sucn cases, tne CS, DS and FS registers are ail 
initialized to tne beginning of tne cone eroup, wnile tne SS 
and SP registers remain set to a 96-cyte stacit area in tne 
CCF. Tne Instruction Pointer (IP) is set to 100 H, similar to 
CP/M-60. Tne intermixed coae ann nata regions are 
indistlnguisnaDle . Tnis model allows simple translation of 
8080, 808p and Z80 cone into tne 8088 and 8088 environment. 

Following program load, tne £080 v cdel appears as ir. Figure 
8, wnere low addresses are snown at tne top of tne diagram . 
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SP 



CCP 



CS , DS , 2S : 
CS + CZk't.H 



ba 5S 
page 



:s + eizzH: ! ip = zizzh » 

! code ! 

! aata ! 



! code ! 

! data ! 

Figure 2 Tne Memory Model, 

o. Toe Snail ^odei 

Toe Snail Model is assurei wnen tr.e transient 
program uses cctn a coie and data group. (In ASM85, ail code 
is venerated following- a CS2G directive, wnile data is 
defined following a DS2G directive.) In tnis case SS is set 
to tne beginning- of tne code group, tne CS and 3S registers 
are set to tne start of tne lata group, ana tne SS ana r ? 
registers rerain in tr.e CCP's area as s.oo*n grapni '-a i iy ir. 
Figure 3. 



2Z 
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CC? 



i 



S tacs 



Si + SF: 



! IP = 0PC0K 
! coae 

» 

DS, ES : 

! base 

! page 



DS + 010KE: ! ! 

! data ! 
; r 



Figure 3 Trie Srali Memory Model, 
c. Tne Compact Moaei 

Tee Compact Model is assumed wnen separate code 
and data eroups are present, along *itn one or more of tne 
remaining groups. In t.nis case, tne CS , DS and SS registers 
are initialized to tne base address of tneir respective 
areas. Tne SS and SP registers remain in tne CCr area. If 
tne user intends to use tne s tactc group as a s t a c area, tne 
transient prc?ram must set tne SS and S? registers upon 
entry. Tne initial configuration of tne segment registers in 
tnis model is snown in Figure 4. 
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! paee ! 
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lata 
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f 



£S : 
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j 

» 



lata 



Figure 4 Tne Compact memory Model. 



Tie values of tne various segment registers can 
oe programma ti cal ly cnanged luring execution oy cnanging tne 
values in tne base page as describe! in tne preliminary 
documentation, tnus allowing access to tne entire memory 
space . 

2 . Transient Program Setup And Termination 

Similar to CP/M-90, tne CCP parses up to two file 
names following tne command and places tne properly 
formatted File Control 3ioc£s (FC3's) at locations 0005CH 
and 006CK in tne base page relative to tne DS register. 
Under CP/M-60, tne default DMA (direct memory access) 
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address is initialized to in tne Dase page. Due to tne 
segmented memory of the fcfc?b6 ana bfc'b'b processors, tne DMA 
address is divided into two parts: tne DMA segment acaress 
and tne DMA offset. Also, under CP/M-36 , tne default D v a 
D ase is set to tne value of DS , and tne default DMA offset 
is initialized to 2V8V?.. Tnus, CP/ y -b£ ana CP/M-bS operate 
in tne same way in tnat they ootn assume tne default DMA 
address is tne second naif of tne base page. 

Tne CCP transfers control to tne transient program 
tnrougn an 3035 "Far Call." In ail but one case of tne 
Compact Model, the transient program may choose to use tne 
96-byte CC? stacs, and optionally return directly to tne CC? 
upon program termination by executing a "Far Return." 
Programmatic termination also occurs wnen 3D0S function zero 
is executed. The operator may terminate program execution by 
typing a single CONTROL-C during line edited input. Tnis nas 
the same effect as programmatic execution of SDOS function 
zero. Contrary to tne operation of CP/M-30, no disff reset 

occurs and the CCP and EDOS modules are not reloaded from 
tne disi upon program termination. In snort, for tne user 
familiar with CP/M-60, tne CP/M-56 environment is very 
similar, but more powerful. 

D. SDOS SUMMARY 

Entry into tne EDOS is made tnrougn tne b£85 software 
interrupt * 224. The SDOS is, essentially, a set of 59 
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functions of tnree tasic types? simple functions, file 
operations ani extended operations. Tne interface convention 
for BDOS calls requires mat function code te passed in 
register CL witn parameters passed in register D1 or DX 
depending on wnetner it is a oyte or word value. 3yte values 
a re returned in tne AL register and word values in registers 
IX and BX. Taole 1 oelow, from Reference 5, summarizes tnese 
conventions. A full description of eacn BDOS function is 
given in [Ref .6 J . 



! BDOS Entry Registers ! 



! CX Function Code 
! DL Byte Parameter 
! DX tford Parameter 
! DS Data Segment 

t 



! BDOS Return Registers ! 



AL Byte Value 
AX Vord Value ! 

EX Word Value ! 

BX Doutie iord Offset ? 

ES Segment Address ! 



Conventions . 



Tatle 1 BDOS Parameter 



E. BIOS SUMMARY 

Tne BIOS is loaded into memory just a cove tne CCP and 
BDOS modules as illustrated in Figure 5. 

Since tne BIOS may te configured Dy tne user, it may 
vary somewnat in lengtn. Individual routines witn in tne BIOS 
may te at different memory locations. In order to 
standardize tne interface to tne BIOS, all accesses to tne 
BIOS are made tnrougn tne jump vector at tne cegir.ning of 
tnat module. Tne BIOS, iiKe tne BDOS, also nas parameter 
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Figure 5 Memory Location of tne SICS. 



passing conventions. Parameters for routines ir. tne SICS are 
passed in tne Cl register and tne PX register wnen required. 
3yte values are returned in tne SL register and word values 
in SX. 

Tnere are tnree major types of routines in tne SIOS: 
system initialization/reinitialization, simple character I/O 
and dislc I/O. All simple cnaracter I/O operations are 
assumed to De in ASCII, do t n upper and lower case, witn tre 
nign order (parity) cit set to zero. CP/M sees ail 
peripneral devices as "logical" devices. Translation from 
logical device selection to pnysicai device assignment is 
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accomo! i sned in tne BIOS, tnus isoiatir.? tne 



CCP and 



3DQS 



from nardware dependencies. BIOS routine entry is explained 
in Digital Researcn'a publication [Ref. bj . Tne BIGS also 
contains tne Disk Parameter Tacies wnicn contain tne 
description of tne disi drive and provide a scratcnpaa area 
for certain 3D0S operations. 



III. INPUT/OUTPUT DEVICES 



In CP/M-So tne CCP and 3D0S accomplisn all I/O via four 
logical de v ices. Tne BIOS assigns whatever pr.ysicai 
devices a re in tra t particular system to tr.ose logical 
devices. Tnis capping in tne BIOS preserves tne independence 
of tne CCP and BBOS from tne Hardware configuration. 

A. LOGICAL I/O DEVICES 

CP/M-85 addresses four lexical I/O devices: tne console. 

l ne i^-st ip v ica» P u “cr device a n d ^ n e feace r . Tne 

console is tne principal interactive paripneral t r.rousn 
wnicn tne operating system communicates witn tne operator. 
Tne list device is tne principal listing device, usually a 
nardcopy printer. Tne punen aevice is tne principal tape 
punening device, usually a nign-speed paper tapp punen or 
teletype. Tne reader is tne principal tape reading device, 
tfnen tne "iOBYT.S" function is implemented, dyr.ami'' logical 

to pnysicai device mapping may oe accomplisnea as assented 
in Ref. 5. 

i. PHYSICAL I/O DEVICES 

The CONIN, CONOUT, LIS TOUT , PUNCH and READER routines in 
tne BIOS define tne pnysicai interfaces witn peripr.erals. 
Tne system adapter may define, in tne BIOS, suen cevices as 



cassette tape recorders etc. 



so long as it is interfaced 



v/itn one of me logical devices. In tms adaptation tne list 



device and tne consc-ie device are cotn mapped to tne serial 
else connector *nere tne CRT console is connected. Tne 
reader is "stubbed" witr. an "end of file" input, tnat is, 
instead of a routine to interface a pnysicai read device, 
tne BIOS simply returns an indication tnat tne read nas r -een 
complete. And tne puncn device map is "stUDted wit n a 

return statement. 

C. DISH DEVICES 

1 . Hard DisKs, Eloppy Dis;xs 

Tnere are many implementations of tne card aisx 
tecnnolosies . Tnere are fixed and movaoie need cisxs, 
removable lis£ pacics and even combination nard and floppy 
systems. Floppy diskettes come mainly in tne 5" and 3" size, 
single and double density, sin die and double s ii<=d , and as 
indicated above in combination vitn nara aisns. 

Organization of Data 

A 1 1 n o u g n eacn disi drive Ta.y ce different, data is 
stored in conceptually tne same manner. Tr.e disx surface is 
divided into tracss (cr cvlimers, if a multi-platter 
system.) Eacn trade is divided into sectors. Eacn setter is 
addressable cv tne controller, making it tne basic unit cf 

storage. In multi-platter and/or muiti-nead systems, to 
access tne aisle tne controller must select tne proper 
.lead/piatter as well as tne tracx and sector required. 



The amount or lata tnat can oe stored on a revise is 



dependent on tne size or' tne aevice ana tne recording 
format. Dou ole density, as tne name implies, gives twice as 
muon storage on a diskette as single density. Tne cost, 
ncwever, is treater. 

Altnougn tne basic unit of storage is tne sector, 
sectors are not tne same size in every system. In general, 
tne larger tne sector, tne more efficient tne storage, cut 
tne less efficient tne access. Many systems allow the user 
to select tne sector size from a limited set of c noices. 
Sectors are normally a multiple of 128 bytes. 

3. Interfaces to tne Computer 

Tne irey to tne storage of information on tne 
recording meiia, at least from the operating system 
modifier's point of view, is tne disic drive controller. Tne 
controller itself is usually a microprogrammed 
microprocessor. Tne controller nannies tne actual reacir.g 
from and writing to the lis£ in addition to other lunations 
such as seet, format etc. The relative autonomy of tne 
controller frees tne operating system from having to handle 
disc I/O on a primitive level. However, tne 3ICS, «nicn is 
.hardware specific, must still communicate with the 
controller at a fairly low level. 

Most microcomputer system I/O is lone oy DMA. In 
general tne nost operating system creates, somewnere m 
memory, an entity, often called a "command pacKet” or "I/O 
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parameter oioci" or some similarly descriptive name. Tne 
"packet" is usually sever, to ten oytes or information wnim 
con tain tne detailed command for tne disit drive controller. 
Tnese "paccets" form tne sole means of issuing i/O commands 
to tne controller. 

Normally tne disi drive con troiler/i nterfa ce snares 
a dus vitn tne nost system. As a result tne controller's 
command/status registers nave device addresses from tne Dus. 
In most systems, tney can be set cy tne user prior to system 
start-up. 

Tne nost system sends tne address of tne I/O command 
pacicet to tne command registers of tne controller. Upon 
receipt of tnis address tne controller initiates action to 
gain control of tne dus. tf.de n tne controller nas control of 
tne dus it reads tne appropriate number of bytes frorr me 
address it va< eiven. Tne controller decodes tnis 
information and tnen carries out tne prescribed operation. 
Tne controller may signal completion in various ways, tne 
most common being entering a completion code in tne command 
uacKet for tne nost to read, sending- an interrupt to tr.e 
nost processor, or storing tne status in an or.-Doard status 
register for tne nost to read. 

Many systems allow tne DMA to be "tnrottied" , tnat 
is, tne controller ?i ves up control of tne bus periodically 
in order to increase overall system speed. 
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Otner features commonly included in dise drive 
controllers are: linxei I/O, tnat is, tne anility to execute 
more tnan one I/O command, pacxet without prompting from tne 
nost processor. M ultiple sector I/C, tnat is, tne ability to 
read or write more tnan one sector in response to a single 
I/O command pacxet. 

4. Examples of Particular Controllers 
a. 1 S EC 201 (Single Density '“IDS) 

Tne iSEC 201, as described in Ref. 7, is tne 
controller/interface for INTEL'S INTSLLEC V DS 800, an 8080 
processor based microcomDut er development system. 

(1) iSBC 201 Controller Operation . Tne 
controller is composed of two circuit boards, a cnannel 
board and an interface board. Tney interface witn tne nost 
processor via tne svstem MULTIBUS, a system's bus used by 
INTEL Corporation. Tne cnannel board and interface board 
togetner nandle all communications between tne nost CPU and 

the diskette system. They contain an 8-bit microprogrammed 
processor wmcn can access system memory for obtaining 
cnannel commands via DMA. The controller also monitors the 
dise subsystem status ana error conditions and maxes tnei r 
status available to tne nost CPU. 

This diskette system records data cy tne 
Frequency Modulation (FM) metnoa, giving a formatted £" 
diseette capacity of approximately 256K. bytes, divided into 
77 traces of 25 sectors each . 
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Functionally, tne nost CPU rust create a 
command packet m memory for eacn operation. INTEL calls 
tnis pacscet an I/O Parameter Floes (IOPB). An IOPB is ten 
bytes in lengt.n and specifies all tne details of tne 
diskette operation to be performed. Tne CPU, in tne rase of 
CP/M-Bb, tnrougn tne BIOS moaule, sends tne address of tne 
IOPB to tne controller. Tnen tne controller *?ains control of 
tne bus, retrieves tne IOPB and executes tne command. Upon 
completion the controller posts tne diskette subsystem 
status and, if enabled by tne IOPB, sends a completion 
interrupt to tne host CPU. The information in tne IOPB 
consists of: 

Byte 1 - the cnannel word, tnis byte specifies tne 

enabling of tne Iocs override, random format 
of tne 1 o etc override, random format sequence, 
interrupt control, data word length, successor 
bit, oranen on wait ana wait Dits. 

Byte 2 - specifies tne drive selected, data length. (3 
or 13 bits/word) and tne operation to be 
performed . 

Byte 3 - specifies tne number of sectors to be 
t ransf erred . 

Byte 4 - specifies tne target tractc number (0-77). 

Byte 5 - specifies tne first sector to be accessed (1- 
25) . 
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Byte 0 - specifies tne least significant byte of tne 
Duffer address. 

Byte 7 - specifies tne most significant byte of tne 
buffer airess. 

Byte y - indicates a blocs number wnicn allows a unique 
identification of an IOPB during United I0PB 
operations. 

Byte 9 - contains tne least significant byte of tne 
buffer address of tne next linsed IOPB. 

Byte 10 - contains tne most significant byte of tne 
buffer address of tne next United IOPB. 

Tne iSBC £01 can execute seven ''ommards: 

1) recalibrate (sees tracs O) 

2 ) sees 

3) format a tracs 

4) write data (witnout address marSs) 

5) write data 
5) read data 

7 ) verify CRC 

Tne controller nas seven registers tnat are 
accessible to tne dost CPU. Tne nost CPU can read tnree of 
tne regi s ters : Tne Result Status register indicates tne 
status of botn drives (ready or not ready), tne status of 
tne controller for tnat drive (present or not present', and 
tne status of tne controller's interrupt flip-flop 
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(interrupt pending or completed). The Result Type register 
indicates whether tne Result Byte register contains I/O 
error codes or ready status. The Result Byte holds the I/O 
error codes or diskette drive status. The host CPU can write 
to four of the controller's registers: Writing anythin*? to 
the Reset Diskette System register resets the entire 
dissette subsystem. V riting to tne Stop Diskette Operation 
register terminates I/O after completion of the current 
operation. The Memory Address Lower register receives the 
least significant Dyte of the address of tne IOPB. The 
Memory Address Upper register receives tne most significant 
byte of tne IOPB address and when written into signals tne 
controller to retrieve tne IOPB and commence the specified 
operation . 

(2) BIOS Use of tne iSBC 201 . Tne CP/M-Sb EIOS 
uses only operations 1, b and 6 ( seen: is implicit in read 
and write operations). In addition, CP/M-Sb do°s not use 
United IOPP's and only does single sector disK accesses. 
This very mucn simplifies the I/O routines in tne BDCS ard 
tne BIOS. Not using tne United IOPB capaciiity allows 
reducing the IOPBs to tne first seven bytes, of wr.icn bytes 
1 and 3 remain constant. Byte One remains uncnangea because 
the mode of disit access remains uncnanged. Byte Tnree, tne 
number of sectors, remains set at one, and tne operating 
system is freed from computing tne number of sectors per 
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access. Tries® simplifications allow t r e BIOS tc nave a 
single IOPB template in memory. 

A limitation of tne iSBC 201 is its 15-bit 
addressing. Tnis limitation means tnat tne controller can 
only address t54: K of system memory as compared tc tne SKBt > 
processor's mesracvte of address space. As a result. tne 
external address of tne iSBC S6/12 must resin® in tne first 
54£ of tne megabyte (from 0C000H to 0FFFFH). Tne BIOS in 
tnis adaptation converts tne segment and offset address 
provided by tne BDOS into a 16-bit pnysical address for tne 
controller. 

(2) Bootstrap Use of tne iSBC 2C1 . Tne bootstrap 
program does use tne multi-sector access capability of tne 
controller for loading tne cold start loader. Tnis requires 
four IOPBs in tne bootstrap program but reduces tne number 
of disic accesses from 52 to four. Considering tne 
specialized function of tne bootstrap loader and its lacy of 
interface witn tne BDOS, tnis is a very efficient deviation 
from tne otnerwise efficient CP/M metnoa of disic access. 

D. iSBC 202 (Double Density MDS) 

Tne iSBC 202 is tne cont rolier/mterface for 
INTEL'S INTSLLEC MDS S88 microcomputer development system. 
It is described fully in Ref. 8. 

(l) iSBC 202 Controller Operation . Prom tne 
users point of vie* tnis controller is essentially tne same 
as tne iSBC 201. Tne main difference is tne recording 
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format. v odif ied-^odif ied frequency Modulation (MMFM) is 
used, allowing tne same media to ncia (formatted) 512K bytes 
of data, divided into T' 7 tracts of 62 sectors eacn. Tnis is 
twice tne capacity of tne single density system. 

(2) FIGS Use of tne iSLC 202 . Tne interface to 
tne controller is tne same as t.iat of tne iSBC 201 . Tne 
difference in organization and capacity is only evident in 
tne dist definition tanie "DOUBLE. LIB" . 

(3) Bootstrap Use of tne iSBC 302 . CP/Y's double 
density formatter formats tne first two traces of a diskette 
in single density, ie. 26 sectors per tract. Tne 'old start 
loader fits in tne first two tracts of a douDle density in 
tne same way as in single iensity. ft.s a result, tne sare 
pootstrap program will load tne cold start loader from ootn 
single and double density distettes. 

c. HEM EX rdw 3200 

Tne RDtf 5230 , as described dv Ref. 9, Ref. 10 
and Ref. ll, is a multi drive unit consisting of a fixed 
Winchester Tecnnology Id" dist and two 3" flexible diskette 
drives. Tne distette drives are "jumper" selected as eitner 
single or double density. In botn types tne sector size is 
selectable. Tne formatted capacity of tne fixed dist witn 
sector size set at 129 bytes is 10 megabytes. Tnis data is 
on 210 tracts of 104 sectors for eacn of two read/write 
beads. Tne single density floppy drives, formatted for 123 
bytes per sector, bold 26 sectors on eacn of 77 tracts for a 
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total of 356K bytes of storage. Set for aouDle dpr.sity, tie 
smallest sector size available is 356 bytes. At 35 sectors 
per trac£, for 77 traces, formatted storage is 513X bytes. 
If tftis drive were use! for CP/M-86 in tie double density 
mode, tie difference between diskette sector size (356 
bytes) and CP/M-B6 sector size (136 bytes') would be Handled, 
by a ’’ bl octi ng/de Dloc £i ng" algoritnm lite tne one provided 
witti CP/M-85. 

(l) Tie P.DW Controller . Tne neart of tne 
controller is a microprogrammed Motorola S6Cfc! 8-bit 

microprocessor. Tne controller pnysicaliy resides inside tne 
RDrf frame and is linked to tne nost system Dy an interface 
card. Tnis alteration utilized a MULTIBUS interface, wnicn 
resided in tne cost's system MULTIBUS. Tne interface 
provides registers for communication between tne nost and 
tne controller CPU's. Data can be dandled as 8-bit words, 
16-bit words or as 8-oit naif-words. Tne controller can 
accompiisn I/O by DMA, programmed I/O or by interrupts. All 
list writes are by Modif ied- M odif ied Frequency Modulation 
(.MMFM). Tde distt drive system can also be DMA tnrottlsd, 
wnicn permits otner masters to sain access to tne system's 
bus in between accesses by tne disc unit. 

Functionally, tne nost CPU must create a 
command pacKet in memory for eacn operation. A command 
pactcet is six to fourteen bytes in lengtn and specifies all 
tne details of tne distc operation to be performed. In tne 



37 



D'-’A. moae tne nost CPU must test tne status register in tne 
controller interface to assure tnat tne controller is ready. 
Wnen tne controller is ready tne CPU, in tne case of 
CP/'l-ee, tnrou?n tne BIOS module, sends tne address of tne 
command packet to tne controller interface. Tnen tne 
controller ?ains control of tne bus, retrieves tne command 
pacffet and executes tne command. Upon completion, tne 
controller posts tne disK subsystem status in tne command 
packet in system memory and, if enabled bv tne command 
packet, sends a completion interrupt to tne nost CPU. Tne 
command packet consists of six to fourteen bytes. Tnis 
controller supports five types of operations. Tne size of 
tne packet and tne information it contains are determined by 
tne operation to be performed. Tne five operations supported 
are : 

1) read data/write data 

2) write I.D. and data for single record 
(fixed diSK only) 

3) copy from one drive to anotner 
format designated disx 

5) maintenance package 

Tne controller nas four registers tnat are 
accessible to tne nest CPU. Tne base address of tr.ese 
registers is switen selectable. Tne base address plus one is 
tne status register, from wnicn tne nost CPU determines 
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system status. Tne base address plus tnree receives tne 
lower byte of the address cf tne command packet. Tne case 
address plus two receives tne middle byte of tne command 
pacfcet address. Tne Dase address receives tne upper byt° cf 
tne packet address ( RDW 3200 supports 24-bi t addressing and 
when written into signals tne controller to start DMA . 

(2) BIOS Use of tne RDW 3200 . Tne CP/ M -b'6 BIOS 
would use only tne re ad /write operation. Tne fact tna t tne 
nard disc has more tnan one nead would require that tne BIOS 
disc definition table looC lice one continuous set of traces 
and that prior to initiating DMA, tne BIOS translate a 
logical trace number to a physical nead and trace number. 
Tne read and write paceets nave tne sane format wnicn 
requires only one paceet template in tne BIOS. That pacCet 
taees tne following form; indicated as 15-bit words: 

Word 0 - I/O modifiers (lineed I/O, interrupts, etc. } , 
operation and drive selected. 

Word 1 - status word - written by controller. 

Word 2 - trace number. 

Word 3 - nead and sector start number. 

'Vord 4 - lower 16 bits of D V A address. 

Word 5 - nign byte of DMA address. 

Word 6 - transfer word count. 



Altnougn tne RDW supports 24-bit 
addressing, it requires a 24-bit physical address, not the 
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sequent ana offset type aaaress proviaea tv tne BEOS. 
Therefore tne BIOS must translate tne adaresses tefore 
placing tnem in tne command packet ana before sending tnem 
to tne interface. 

(3) Bootstrap Use of tre RD.V 3^00 . Tne 
oootstrao program would use tne multi-sector access 
capability of tne controller for loading tne cold start 
loader (tne command packet specifies tne number of words 
to be transferred). If tne operating system were to be 
loaded from a diskette, tne bootstrap operation would re 
very mucn like tnat described for tne iSBC 201. For a 
system load from tne nara disk tne bootstrap program could 
load tne operating system wit n out tne use of a cold start 
loader. Tnis would only require two disk accesses, one to 
determine tne load location and tne otner to actually load 
"CP^.SYS". 
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17. ALTERATION OF CP/M-86 



A. CHANGES REQUIRED TO IMPLEMENT CP/M-B6 

As distributed* CP/M-86 is set up for operation witn an 
Intel S3C 85/12 microcomputer and an Intel SBC 2/4 diskette 
controller with a Snusart SA-80/ floppy disic drive. Since 
CP/M-86 is nodular, only tne BIOS need be modified for "non 
standard" Hardware. Tne distribution version includes source 
code for its BIOS and a sseletai BIOS to aid in tne 
construction of a customized version. Although tne 
distribution version does not provide a bootstrap ROM , tne 
source code for tne program is provided. Tnis source cole 
provided an example for tne creation of a customized 
bootstrap proeram. Tne bootstrap ROM is available from 
Digital Researcn. 

The cnanges required to customize tne BIOS can be 
divided into four types. Tne first consideration is tne 
computer selected for tne implementation. If an £086/5/ 88 
based computer otner tnan tne iSBC 56/12 were cnosen, tne 
computer initialization, including tne constant definitions 
for USART ports and cr.aracter I/O routines sucn as console 
status, console input and console output, nave to be cnanged 
to match the host Hardware. Since the iSBC 85/12 was used, 
no changes were required in tnis portion of tne BIOS. 
Second, if the dis£ drive controller or otner DMA device is 
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not an iSBC 204, tne controller port definitions and tne 
routines wnicn actually communicate witn tne controller must 
ce altered. Tne "execute" and "sendcom" routines were tne 
bulk of tne modification. Tnese routines cnectc system 
status, translate system commands tc tne language of tne 
controller, deliver tne commands to tne nardware ana r.anaie 
any nardware errors. Tnirl, if any otner serial cr parallel 
I/O device is to be used, tne appropriate initialization and 
execution routines must oe written. Tne fourtn consideration 
is tne disc definition table wnicn is assembled witn tne 
BIOS via an "include" statement. Di sk parameter tables must 
be created to describe the disk system. Disk parameter 
tacles are discussed in tne next section. In tnis version 
only tne second and fourtn types of modifications were 
necessary and tnose cnanges are reflected in Appendix A 
(single density) and Appendix B (doucle density^. Appendix D 
contains tne distribution BIOS. After assembling tne BIOS, 
the nexadecimal code, "3I0S.E56", is appended tc "CFM.E86" 
and a command file is generated by tne metnod described in 
Ref. 6 using tne OENCMD utility. Tne file created is named 
"CPM.SYS” and is tne operating system. 

B. DISK PARAMETER TABLES 

The disk parameter table serves to define tne 
organization of the storage media for tne BEOS file 



management functions. Tne disk definition consists of tne 



sequence of statements in Figure 6 (as snown in Ref. 6). Tne 
DISKS statement defines tne number of drives in tne system, 
vitn n being an integer from 1 to 16. A series of DISKDEF 
statements follow. Eacn statement defines tne 
cnaracteristics of a logical disit, fc.' tnrougn n-1. DISKDEF 
statements are formed as defined in Ref. 6. Tne format is 
snown in Figure 7. 

DISKS n 

DISKDEF E,... 

DISKDEF 1,... 

DISKDEF n-1 

ENDEF* 

Fieure 5 BIOS DisK Definition File. 



DISKDEF 


dn 


,f sc 


wnere 


dn 


is 


tne 


f sc 


is 


tne 


Isc 


is 


tne 


SKf 


is 


tne 


bis 


is 


tne 


dKs 


i s 


tne 


dir 


is 


tne 


CKS 


is 


tne 


0 fs 


is 


tne 


[0J 


is 


an 




Fi 


?ure 



logical disK number, 0 to n-1 
first p.nysical sector number (e or 1) 
last sector number 
optional sKew factor 
data allocation Mock size 
disK size in bis units 
number of directory entri°s 
number of "cnecKed’ directory entries 
tracK offset to logical tracK fci: 
optional 1.4 compatibility flag 



Figure 7 DISKDEF Statement Format. 



Tne disK tables may be generated by nand or by executing 
tne GENDEF utility program. Tne table provided witn tne 
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distribution version, called "S INGLES . LIB" , was generated 
from tne source file "s INGLES . DEF" oy tne GENDEF utility 
runninv under CP/M-60. Tnis table was correct for tne single 
density implementation. It was necessary to create a new 
taole for tne nouDle density system. Tnis file is called 
DOUBLE. DEF. Taole veneration is described fully in Section 6 
of Ref. b. Tne dist parameter taoies are listed in tne BIOS 
rignt after tne "include" statement (see Appendices A and 
B). 



C. COLD START 

1 . Tne Cold Start Loader 

Since CP/M-85 is too larve to fit in tne first two 
(system) traces of a diskette, it Is loaded into memory in 
two st ps. First, a cold start loader is loaded from tne 
first two tracts into memory. Next tne loader loans tne 
operating system and transfers control to it. Tne loaner 
( "LOADER. . C'lD ” ) is a simplified version of CP/M-86 witn 
enougn power to locate tne operating system file "CP^.SYS" 
on tne current dist, mate tne proper initializations, load 
CP/M-S6 into memory and tnen transfer proeram control to it. 
Tne loader is created from files LDCPM, IDBDOS and tne 
loader version of tne BIOS. Tne leader BIOS is venerated 
from tne same source code as tne BIOS by setting tne 
software switen ”LCADER_BI0S" equal to true prior to 
assem bly . 
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Tne loader program is moved to tne first two trades of a 
disxette by tae LDCOPY utility if running on a worxine 
CP/M-36 system. If developement is done on a CP/ v -B0 system 
tftis can be accomplisned vitn tae DDT and SYSG-EN utilities. 
P.ef. 6 errs in its discripticn of tae latter procedure. Tae 
correct procedure is described in tae next adapter. 

2 . Tae Bootstrap ROM 

In order to ?et tne cold start loader into memory, 
tnere must be a bootstrap loader of some xind. Tnis boot 
loader must initialize tae proerammaDle cnips on tae single 
board computer and tne disc drive controller wnicn will 
access tae operating system lisx. It tnen loads tae iirst 
two tracts of tne diskette in tne system dis.t drive into 
memory and tnen transfers control to tne program loaded, 
"LOADER . CMD" . Tne bootstrap program is normally resident in 
a read only memory (ROM) or electrically programmable ROM 
(EPROM) and is tnen referenced to as tne boot ROM. 

Tae distribution version of CP/M-86 also contains 
tne listing for a bootstrap RO" (R0M.A86). Tne boot ROM 
itself is available from Digital Researcn. tfnen installed, 
it becomes part of tne 8086 address space. Upon system 
reset, tne processor begins execution at effective address 
0FF000H, wnicn is tne top paragrapn of tne iSBC 86/18 EPROM 
space. Tne bootstrap program is nardware dependent wnicn 
necessitated tne creation of a customized initial loader for 
tnis implementation. 
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Intel's SEC 9b7 Execution V eni c ie Monitor ( EV M ) 
occupies tns EPROM locations wner installed in tne iSRC 
06/12 and is currently in use at tne Naval Postgraduate 

Scnool. In order to retain tne use of tne iSSC 95? and to 
simplify implementation , tne customized bootstrap program 
nas been embedded in a free area of tne EVM's EPROMs. Sirm? 
tne monitor initializes tne single board computer wren it is 
started, tne CP/M-eb bootstrap tasi is simplified. Tne 
bootstrap program listing is in Appendix C. It is a modified 
version of tne "debug” version of Digital Resear^n's ROM 
program. Tne modified bootstrap program is located at 
effective address 0FFD40H. It may fc° executed from tne EVM 
by executing tne command GFFD4:0 or its equivalent. 
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CONCLUSIONS AND RECOMMENDATIONS 



A. ADAPTATION DIFFICULTY 



Modification 


of 


CP/M-co is 


a 


straisntforward 


simpi e 


procedure if one 


is 


familiar 


wi tn 


CP 'M on a system 's 


software level 


and 


witn at 


least 


some represen 


native 


nardwAre. if one 


does 


not nave su 


c n 3. 


c^CKground (tne 


a U tnor 



dii noi)» me tas* is not o verwneimi nz , out considerably 
more difficult. Tne novice will probably invest mucr. time 

and effort in investigating "dead ends" because of not 
understanding tne logical design of tne operating system. A 
oarticularly vexing problem encountered in tne first 
adaptation was tnat in tne later stages of development, 
every error in tne corrected software seemed to destroy tne 
information on tne diskette, masing decugging difficult and 
requiring frequent regeneration of software. During tnis 
period of "destructive testing” approximately 90'S of tne 
time and effort were spent on sucn overnead and only 10X on 
actual denugeine. Tne real proclem mere was not tne time 
lost nut tne interruption in tne train of tnougnt. 

Documentation inadequacies are anotner source of 
problems. Tne alteration guide for CP/M-fcb provided ny 
Digital Researcn (Ref. 6) assumed a tnorougn Knowledge of 
CP/M-80, wnicn was not possessed oy tne autnor. Tne CF/M-80 
documentation also seemed to assume a tnorougn Knowledge of 



4? 



the ot>eratinc system's modules. In addition, there were 
several errors in tne alteration guide. 

Tne procedure for moving tne cold start loader to traces 
zero and one under CP/y-82 is incorrect and if followed tne 
first S0ZH bytes of tne program will ce lost. A correct 
procedure is to load tne cold start loader *itc DDT, move 
the program so that it starts at , exit DD? and finally 

call tne SYS5SN utility. A correct sequence of commands 
Iooks liKe this: 

DDT LOADER . CM D 
ml 100 ,18i50 ,1900 

71300,1100 ,1200 

714:00 , a0£ ,C00 

ul 00, 400 ,90Z 
<C ONTROL-C > 
sr SOEN 
<CR> 

TS 

<CR> 

Tne documentation for tne 3065 assemoiers, "ASdete . C0 V " 
and ”AS V 86.CMD" also contains errors. According to tne 
user's manual, [Ref. , tne ’’device switch” for tne listing 
device is ”P . Tne correct switcn is ”d”. 

The technical manuals provided with tne disK drives ana 
controllers used rather ambiguous and non standardized 
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terns. Tnis often require! emerimen tat 1 or. to determine wnat 
was really reant. 

Resolution of tne above difficulties, However, was a 
good learning experience for tne autnor. 

Jj. RECOMMENDATIONS FOR FUTURE RARE DISK ADDITION 

1 . Discussion 

A1 1 nou eft tftere are several met nods of accompl i sn i ne 

disc I/O, DMA seems to be tne simplest to implement and 

debus. A future ftarl disc addition would greatly ennanre 

CP/M-86's usefulness. In tnis vein, a nard disc/floppy disc 
combination would be ideal. Tfte combination of hard and 
floppy discs would provide tne speed ar.o storage capacity on 
one Hand (from tne nard disc) and tne ability for tne user 
to ceep copies of ftis files wftere ne is assured of tfteir 
security and integrity. However, inclusion of tne i SEC 20 1 
or 202 is not recommended. Tfte limited addressing ''apatility 
of tnese cont rollers would binder overall system 

effectiveness and force tfte processor to operate in tfte 
bottom of tne address space. As a rule of tnumo, if more 

tftan one device is to be aided to tfte basic system, only one 
device snoula be added at a time. 

2 . Template for Adaptation 

Given tnat a nard disc is to be installed in place 
of tfte discette system, tne following procedure snculd be 
followed: 
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First, tne CP/M-Bb BIOS should be studied in 
conjunction witn tne current hardware to see now tne 
interface is currently accompli sued . Tne system modifier 
must understand now tne operating system interacts witn 
nardware before creating nis own interface. Second, tne 
target nardware must ce studied. Tne electronics are not 
important, but wnat tne nardware dees logically and new it 
communicates witn tne controller is paramount. In 
particular, tne organization of data on a disit drive must, be 
thoroughly understood. If tne organization of data is 
selectable, tne most efficient and stra ign tf orward 
organization must be chosen. If it is not selectable and not 
directly compatible witn tne 3D0S, a "olocicing/aebiocJcing" 
or some other seneme must be considered. Third, a disic 
definition must be written to reflect the logical 
organization of tne disic. If the logical organization of 
data does not maten its pnysicai organization, tne executing 
routine in the BIOS would nave to mate tne translation. Fcr 
example, in a multi nead dist system, tne trades would nave 
to be numbered in tne lisle definition as though tney were on 
tne same platter (logical org.), tne BEOS would select a 
sector and a "logical” tract for I/O, but before sending tne 
channel command tne BIOS would nave translate tnat- "logical" 
tract number to a nead and tract combination. Fourth, a 
template for tne channel command should be placed in the 
BIOS with appropriate variable names to allow the EEOS to 
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provide as muon information directly as possible. ?iftn, 
write tne "execute" routine. Tni s routine, tne oulfc of tne 
coding, must complete tne cnannel command, prepare tne disic 
for access, send tne activating command, cnecx comnletior. 
status and nandle nardware errors. Tnis step requires a good 
sno wl ed^e of tne target distc system and is very mucn 
dependent on tne disk: cnosen. Sixtn, once tne revised BIOS 
is written, it must be assembled (in tne loader version too, 
if booting from a floppy disk). Tne files "CPM.HS6", 
"BI0S.H86" and "PAT2.HS6" are combined into "CPMX.H85" . Tnis 
resulting file is converted to executable form by executing 
tne command "OENCMD CPYX 8082 l A4J?]" as described in Ref. 5. 
Tne resulting file is tnen renamed "CPM.SYS". 

The bootstrap program will be very simple. It can be 
written to explicitly read tne first sector of tne disk, to 
determine tne loading target address, ana to read tne 
following 76 (128 byte) sectors. Once tne BIOS nas been 
modified, tne bootstrap program will be almost a trivial 
subset of tnat code. 
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APPENDIX A 

title 'Cus tomi zel Sasic I/O System' 

5(5 V 

* This Customized 1103 adapts CP/M-66 to * 

* tne following nardware configuration * 

* Processor: iSBC 8612 * 

~ Controller: i S PC 201 sf 

^ memory model: 806 0 !f 

5 S V 

* Proerammer: M.B. Canaalor * 

Revisions : v 



true 


eau 


-i 


false 


equ 


no t 


cr 


equ 


0dh 


if 


equ 


0an 


max retries 


equ 


10 



;i‘or aisi i/o, Before perm 



5? * 

v Loader_bios is true if assembling tne v 

* LOADER BIGS, otherwise BIOS is for tne * 

* CPM.SYS file . * 

ifi 'r 

3?# 7? 5JC & Jfi *C jp JJC *C X* 3F *C JjS J?*C 5* *C 3* 5? *5 5? 3*3* J* 3? 5* 3? jp 3? VV ?? * * n* ^ i>« 7fi Jfi JJS 5jp 



LOADER_BIOS 
bdos_i n t 


EOO 

equ 


TRUE 

22A ,‘reservea BDOS interrupt 


IF 


not 


ioaaer_bios 


J . 

• 1 
9 1 

Dio s_coie 
ccp_of f set 

DIOS of St 

. i ” 

9 1 


equ 

equ 

equ 


i 

i 

2500n 

0000h 

0B06n ; BDOS entry ooint 

1 

1 


ENDIF 


; not 


loader_bios 


IF 

# 


load 


er_bio s 


} ’ 

• i 

* i 

cios_code 
ccp_of f se t 
bdos_of st 


equ 

equ 

equ 


i 

i 

1200n ; start of LDBIOS 
0006n J base of CPtf LOADER 
0A06h Jstripped BDOS entry 



erro r 
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• I 
I I 

! * 



ENEI I 



; loader Dios 



I 

I 



csts equ Clan >15251 status port 

data eau 048n J ' lata 

i 

• 

1 

; * * 

;* INTEL iSSC 201 Dis£ Controller Ports 

; * * s 



base 


equ 


0?8n 


rtype 


equ 


base+1 


rby te 


equ 


oase+3 


reset 


equ 


base +7 


dsta t 


equ 


base 


ilow 


equ 


base+1 


inign 


equ 


Dase+2 




cseg 

org 


ccpof f set 


ccp : 


o rg 


bios_code 




* 3I0S Jump Vector lor Individual Routines * 

V v 



7?*? V 2* >Z * * Zfi V 5? ns *? * * ^ ^ 5?: ^ ** V 3**5* * =? ** 5?;* ^ *f & 



jnp IN IT 
jno WBOOT 
jnp CONST 
jnp CONIN 
jmD CCNOUT 
j Tip LI STOUT 
jmp PUNCH 
jnp READER 
jnp HOME 
jmD SELDSS 
jrnp SETTRK 
jnp SETSEC 
jnp SETUMA 
jnp READ 
jnp WRITE 
jnp LISTST 



; Enter fron SOOT ROM or LOADER 
JArrive nere from SDCS call 0 
Jreturn console Keyboard status 
{return console Keyboard cnar 
{write cnar to console levice 
{write cnaracter to list levice 
{write cnaracter to puncn device 
{return cnar iron reader device 
{move to trie CO on cur sel drive 
{select disK for next rd/write 
{set traci for next rd/write 
{set sector for next ra/wnte 
Jset offset for user cuff (DMA) 
{read a 128 Dyte sector 
{write a 128 byte sector 
{return list status 
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jmp SECTRAN 
jmp SETD M AB 
jmp GETSEGT 
jmp GETICEF 
j-np SETIOEF 



Jxiate ioffi cal->pr.ysi cal sector 
Jset se? case for cuff (DMA) 
Jreturn offset of Mem Desc TaDie 
Jreturn I/O map byte (ICBYTE) 
Jset I/C map byte (IOBYTE) 



* V v 3,* ifi i % i J,J *!» *,» *,* *,» »|« if* 



IN IT Entry Point, Differs for LDEIOS and v 
EIOS, according to "Loader_Ei os " value v 

y SgC >|i J|C 5JC rJC 5|5 JjC #|% 7JC SJC 5JC #|% #J« 3JC #|5 ?JC 3j% 2JC ^ 2JC JJC #p» 3jC #yC JJ% ^ 



IN IT: 



Jprint signon message and initialize nardware 
mov ax.cs Jwe entered witn a JMPF so use 



mov ss.ai ; C S : as tae initial value of S 

mo v ds , ax JDS:, 

mov es,ax Jand ES: 

Juse local stacK during initialization 
mov sp, offset stsbase 

eld Jset forward direction 



IF not loader_bios 

f —————— — —————— 

. t I 

J I I 

J Tnis is a EIDS for tne CPM.STS file. 

J Setup all interrupt vectors in low 
; memory to address trap 

pusn ds Jsave tne DS register 

mov I OB YTE , O Jclear IOBYTE 

mov ax , 0 
mov ds,ax 

mov es.ax Jset ES ana DS to zero 

J setup interrupt 0 to address trap routine 
mov intO_of fset , offset int_trap 
mov i nt 0_ segment ,C5 
mov di ,4 

mov si , O Jtnen propagate 

mov cx,510 Jtrap vector to 

rep movs ax, ax Jail d56 interrupts 

JBDOS offset to proper interrupt 

mov bdos_of fset , bdos_o fst 

pop ds Jrestore tne DS register 

J (additional CP/M-c6 initialization) 

• i i 



ENDIF Jnot loader bios 



IF 



loader bios 



• I 

* I 



• I 
> I 



; Tni s 



1 s 
pusn is 

moV dX,2 

mov ds.ax 
> SDOS interrupt 
mov bdos offset 



a BIOS for tr.° LOADER 

;save data seement 



to S' 



i gment 



zers 



» point 
offset 
Ddo s_of s t 

mov Dlos_segment ,CS Jodos interrupt 
(additional LOADER initialization) 
pop ds ^restore data segment 



segment 



S.NDIF 



;ioader bios 



mov bx , offset 
call pmse 
mov c 1 , 0 
jmp ccp 



s ienon 

;print signor* message 
; de fault to dr A: on coidstart 
Jjump to cold start entry of CCF 



tfSOQT: jmp ccp+5 



jdirect entry to CCP at command 



IF 



not loader bios 



mt_trap : 

cli 



; bio cs interrupts 

mov ax,cs 

mov ds,ax ;?et our data seement 

mov ox, offset int_trp 
call pmsg 

nit » cards top 



JNDIF 



;nct leader bios 



* 

CP/M Cnaracter I/O Interface Routines 

console is USART (iB25lA) on iSBC 3612 * 
* at ports D6/DA * 

tp. 7p 3jC Xp TfiXp 5 ? 7p ^ Sfi, 3£ 3 ^ 5 ? 3£ 3p 3p Xfi JjC 7p xp ^ 7p J? Xp Jp 3p 7p Xp 3JC 7p Sp 3fi Xp 



CONST: ;consoie status 

in a 1 , c s t s 
and al , 2 
jz const_ret 

or al,255 Jreturn non-zero if rda 

cons t_ret : 

ret Jrevr data available 



level 
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CON IN 



Jconsols in du 



call CONST 

jz CON IN > wait for RDA 

in al ,cda ta 

and al,7fn Jreaa data S remove parity oi 

ret 



CONOUT: 



Jconsole output 



in al ,csts 
and ai,l 
jz CONO'JT 
mov al,cl 
out elate, a i 
ret 



;get console 

; t ransmi t ter 
;tnen return 



status 



cut'fer is empty 
data 



LISTOUT: 



re t 



jlist device output 
;not implemented’ 



LISTST: 



re t 



Jpoli list status 
»not impiementea 



PUNCH: Jwrite punen device 

inot implemented 



READER: 



mov al , lan 
re t 



; re turn eor for new 



OETI05F : 

MOV A L,0 5I03IT E NOT IMPLEMENTED 

re t 

SETI03F: 

ret Jionyte not implemented 



> Routine to ?et ana ecno a console cnaracter 

> and snift it to upper case 



uconecno : 

call CONIiN 
pusn ax 
mov cl.al 
call CONOUT 
pop ax 
emp al , 'a ' 
j b uret 
emp ai , ' z ' 
ja uret 



;get a console cnaracter 
isave and 
Jecno to console 
jiess tnan 'a' is ox 
greater tnan ' z' is ok: 
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/ ^ / / , / 



urs t : 
pmsg : 



sub ai, a - a 
ret 



;eise smf t to cans 



mov ai , [3 X J 
test al ,a 1 
j z return 
mov CL,AL 
call CONOUT 
inc JBX 
jmps pmsg 



;get nett cnar from message 
»if zero return 
; p r i n t it 

;nsxt cnaracter and loon 

* 3* 3£ J?C J* * 3* * ^ * * * * ^ 3? 3,4 3JS 3JC 3? J* J? JJC * 3JC 3JC 3? 3* 3£ 3* 3? 3£ 3JC J* 3? 3£ 3£ 3? JjC 3jC 5? ?,« 

'fi Zr 

* DisA Input/Output Routines * 



;* 








3? 


• 3£3£3£3;: 


J.X 3£ 3£ 3£ 3£ 3^ ^ ^ ^ ^ ^ V 3? V ^ ^ V ^ 3£ 


SELDSK: 




Jseiect disK given 


by register CL 


ndi sis 


equ 


2 Jnumber of disxs 


(up to 15) 




mov 


disx,cl 


;save disx 


number 




mov 


bx , 0000n 


Jready for 


error return 




emp 


cl ,ndisics 


»’n beyond max disxs? 




jnb 


return 


; return if 


so 




mov 


cn , 0 


;iouble(n) 






mov 


bx , cx 


Jbx = n 






mov 


cl ,4 


Jreadv for 


*16 




sni 


bx , cl 


; n = n * lb 






mov 


cx , of f set 


Ipbase 






add 


bx , cx 


jdpoase + n 


* 16 


return : 


ret 




; ox = .dpn 




HOME : 


;move selected 


disX to nome 


position (Tracx 



rov io_com,nomcom 
nov t r x » 45 
call execute 
re t 

SETTRK: ; set tracx address given Dy CL 
mov trie, CL 
ret 

SETSEC: J set sector number given by cl 
mov sect, CL 
re t 

SECTRAN: Jtranslate sector CX using table at [DXJ 
mov cn , 0 



mov bx , cx 
add bx,dx 
mov bl , [bxj 



>aud sector to tran table aidre; 
jget logical sector 
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ret 



SETBMA: ; set DMA offset given by CX 
nov ama_adr,CX 
re t 

S ETDMAJj : {set DMA segment given by CX 
mov dma_seg,CX 
ret 

J 

GETSEGT: {return address of pnysicai memory tacie 

mov bx, offset seg_taoie 
ret 



^ ^ 5? Tfi 5? Jjd V ^ SJ< =??? ^ V 5 



t 5r» V 



All list 
DISK 

trx 

SSCT 
DM A _ ADR 
READ reals 
address, and WRITE 
tne DMA address to 



I/O narameters are setup: * 

is list number (SEEDS A) * 

is tract number (SETTEE) * 

is sector number (SETSEC) * 

is tne d v a iso offset * 

tne selected sector to tne DMA* 
writes tne data from * 
tne selected sector * 



fJX »(• J^C 3JS JJS Jj» JJS JjJ JJ? 5J! 2j£ ^ JjJ ^ SJS JJ* J,t 5J5 JJC JjS 3jC Jj* ?JC 3JS 2J5 3}C Jjt 7^ ij* 5JS »,■» ? 



READ: 

mov cl, 4 
mov al,aist 
sal al,ci 
or a 1 , rdcoie 
mov io_com,ai 
jmps execute 

VEITS: 

mov cl ,4 
mov al.aist 
sal al , cl 
or al,wrcode 
mov io_com,ai 



> combine list selection 
; w i t n opcode 

{create iopb 



{create iopb for write 



EXECUTE: 



outer_retry : 

mov rtry_cnt ,max_retries 

retry: 

in al.rtype {clear controller 

in ai,rbyte { 

call sendcom 



P8 



;#ait for completion 
; ready 



idle: in a 1, la tat 

and ai,4 
jz idle 

; cfiecK i.o. completion ok 

in al,rtype 

; 00 unlinked 1/0 complete 01 linmei l/o comp 

; 10 disK status cnansed 11 (not used) 

; must ce a 00 in ai 

test al,10o Jreaay status cnange? 

JNZ READY 
OR AL,0 

jnz werror ;some otner error, retry 

; cnecK i/o error bits 

in ai.rbyte 
rcl al,l 

mov err_code,80n 

jb wready Junit not ready 

rcr al,l 

mov err_coie ,al 

and ai,0fen ;any otner errors? 

jnz werror 
5 

> read or write is ok, al contains 0 

ret 



wready: Jnot ready, treat as an error for now 
in al.rbyte Jclear result byte 

jmps trycount 



werror: J return nardware malfunction 
trycount : 

rt ry_cnt 
ret ry 

al , err_coie 
an , 0 

ox , ax JmaKe error code 15 bits 

bx ,errt bl LEX] 

jprint appropriate message 



z ret : 



dec 
jnz 
mov 
mov 
mov 
mov 

call pmsg 
in al,cdata 
call uconecno 
cmp al , 'C ' 
je wboot_l 
cmp al , '?/ 
je outer_retry 
cmp al , 'l ' 
je z_ret 
or a 1 , 2 5b 
ret 



jflusn usart receiver buffer 
Jread upper case console cnara 

Jean cel 

jretry 10 more times 
Jisnore error 

Jset cone for permanent error 



ter 






tfbOOt 1 



jcan't ma£e it w/ a snort leap 



j Tip W300T 



^ ?;« 



* sendcom sends tne address of tne iopb to 

* tne iS.BC )301 



# ( % #|* »(» !|t >Jt »|I JjS «,« >JS »(» »,t <|» «(* igt »|t }(• 3y* *|t <J% #|t ^|C «|* «|» 5,t #)» *|* *|« *(» #|« )|t ifC » (t *|% #i* 2yC «^S »,« «<» *,» *)% #,* *)« !|t 



MOV CL , 4 
MOV AX, DM A SEG 
SAL AX, CL 
ALL AX , DMA_ADR 
MOV I 0_ADR , AX 
MOV CL, 4 
MOV AX , CS 
SAL AX, CL 

ADD AX , OFFSET CHANCMD 

out ilow, a 1 

m o v c 1 , 8 

sar ax, cl 

out inign ,al 

ret 



JADD SEG 8v OFFSET FOR ‘die 1 









Data Areas 



«,* 5|* »j* *J» #,% *|« 5jt J|» #JS J,5 «|* I|* »|S 2)C ZfS r|k «|* 5(fC ip 5,% 2|» #|t «J« !|« Jj5 »j» ?,% »|» SJJ Jjt £,C *,» *,» 5,% ? |t f,C S|* #,I «,« J ( % 7|C J,C 



data offset 



eau offset £ 





d see 
org 


data 


offset ; contiguous witn code 


1QBYTE 


do 


0 




disff 


d b 


0 


JdisK cuTioer 


enanemd 


db 


Bon 


Jiopo cnannei word 


iO^COM 


d b 


o 




nsec 


db 


l 


JnuTiber sectors to -tfer 


trie 


d b 


0 




sect 


d b 


0 


; start sector 


IO_ADR 


m 


0000H 


JPHYS AD DR FOR SBC^Ol USE 


dma_adr 


dw 


00S0n 


JDMA adr (default/ 


dma_seg 


dw 


0 


JDMA Base Segment 


HOM COM 
RDCODE 


ECU 3 
SOU 4 
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ERri. CODE DB 00H 



WRCO BE 


SCO 


5 




IF 


1 oader_bios 


! — 

. i 
y i 

s i^non 


ID 


1 

1 

cr f l?,cr,if 


• i 
> i 


d b 


'CP/tf-~6 Version 1 .0 ' f cr . JLf .0 

\ 

\ 


! 


ENEI F ; ioaqer_ci o s 




IF 


not loader_bios 


5 11 11 

> i 

s ignon 


db 


1 

l 

cr f lf t cr f if 




db 


'System Generated 34/28/81' 


• | 
> i 


d b 


c r , i f , 0 

i 


j " l 


ENDIF 5not loader_blos 


int trp 


db 


c r , l f 




d b 


'Interrupt Trap Halt' 




db 


cr , if ,2 


errt bl 


dw e 


r0 , erl ,er2 , er3 




dw e 


r4,er5 ,er6 ,er7 




dw s 


rS ,er9 ,erA,er3 




dw e 


rC ,erD ,erE ,erF 




dw s 


rl2 ,er22 ,er42 , er82 


er3 


db 


cr, if, 'Null Error ?Y',0 


srl 


db 


cr, If , 'Dele ted Record :',0 


er2 


db 


cr , if , 'C RC Error : ' , 0 


er3 


db 


cr, if, 'Data Overrun-Underrun : ' ,0 


er4 


db 


cr,if,'Seetc Error :',0 


er5 


equ 


er0 


erb 


equ 


9 r0 


er? 


equ 


er3 


era 


d b 


cr , if , 'Address Error :',0 


er9 


db 


cr, If, 'Write Protect :',0 


erA 


d b 


cr,if,'ID CRC Error :',0 


erB 


db 


cr, if, 'Write Error :',0 


erC 


db 


cr, If , 'Sector Not Found :',0 


erD 


equ 


er0 


erE 


db 


cr.lf.'No Address ^ars :',0 


erF 


db 


cr, if, 'Data Mars Error :',0 


erl0 


equ 


er3 


er20 


equ 


er9 


er40 


eau 


erB 
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erB<J ac cr, if, 'Drive Not Ready :',0 

rtry_cr.t lb 0 Jlisi error retry counter 

; System Memory Se?ment Table 

segtable db 1 >1 segments 

Iw tpa_se? Jlst ses starts after BIOS 

dw t pa_ien >and extends to 08000 

include singles. lib Jreaa in disfc definitions 

1 o c _s t K rw 32 »* local stacc for initialization 

sticbase equ offset $ 

lastoff equ offset $ 

tpa_se? equ ( last of f J -0400n+l5 ) / 16 

tpa_ien equ 0F00H - tpa_seg 

db 0 jfill last address for GENCMD 



Dummy Data Section 



J 






• y y y r r V T n' Y Y Y Y YY *** Y Y Y Y Y Y Y Y Y Y Y Y Y Y Y Y Y Y Y Y Y Y Y Y 


dsee 


0 


^absolute low memory 


o rg 


0 


;(interrupt vectors) 


int0_of f set 


rw 


1 


int0_sesment 


rw 


1 


; pad to 


system 


call vecto r 


rw 


2*" ( bdos_int-l ) 


bdos_of f set 


rw 


1 


bdos segment 


rw 


1 


END 






rtry_cnt db 0 


> dislc 


error retry counter 



62 



APPENDIX P 



title 'Customize! Basic I/O System' 



JJC if Jf 3jC ^ a? ^ a* & Ifi Xfi a? ajc ap a? 3* sjc ^ a? age sjc a? a? sjc a? 3}C a? sjc ^ a? a* ^ a* 3 * a* a* a? a* 



5? 

V 


This Customized 


3I0S adapts CP/M-66 to 


5? 

3,5 


* 


the following hardware "onf ieuration 


V 


* 


Processor: 


1 SBC 6612 




T 


Controller : 


iSBC 222 


'i* 


5* 


M emory mode 


1 : 6262 


*r 


5? 


Programmer : 


P.3. Candaior 






Revisions : 






>P 









v VV»rV VVVv VVvr v ; ? , i ;s (* i i i VV VVvV ; i ; ^¥'« 1 'ii : V j i s V 



true eau -1 

false equ not true 

cr equ 2ia {carriage return 

If eau 2afc {line feed 

max_retries equ 10 {for aisle i/o, before perm error 



» «|* 3,% »p J|* »I» 5(* *(» «i* »|* 3gC «|« A* 'I* J| 



* 

* Loader_Dios is true if assembling tne 

* LOADER BIOS, otnervise BIOS is for tne 

* CPI. SYS file. 

* 



( 3fC 3*5 »!« i|* )|* #!» i|( if* if* J|C i|( if. if* if* if* J*C if* if* 3|£ if* if* if* if* if* i 



L0ADER_BI0S 

blos_int 


SOU 

equ 


TRUE 

224 {reserved 3D0S interrupt 


IF 

• — j 


not 


loader_Dios 


. 1 
> 1 

bios_code 

ccp_o f f se t 

bios ofst 
• 1 — 

» 1 


eau 

equ 

equ 


1 

1 

2b22n 

2222n 

2B26n {BDOS entry ooint 

1 

1 


ENDIF 


; not 


ioader_oios 


IF 


load 


er_bio s 


5 ■ "■ ■ — ■ 

. 1 
t 1 

oios_code 
ccp_o f f set 
bios_of st 


equ 

equ 

equ 


1 

1222h {start of LDBIOS 
2223h { base of CPMLOADER 
2426h {stripped BDOS entry 
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* I 
» - 



ENDIF 



{ loader Dios 



csts equ Clan ; I Ekd to 1 status port 

data equ Od“n ? ” da ta 



V s ? 5 ? 3^5JC3^^C5J53J5>p3{CJJSJJC)ii>JC3Yt3jS^SS^3JCJi»5JC;^5JS;j%5JtJ5S3Ji5J?^;5j?5i<»?S»P 



* INTEL i S J= C 'die 2 Diss Controller Ports 

5r 



• 5,5 *|! *,« 5(5 5(5 


V V '»* V V 


5(5 Jj* 5(5 5|5 5 J 5 5(5 5 jt 5|5 5,5 5(5 5,5 5 |t 5,5 


base 


equ 


£7Sn 


r type 


equ 


base 4 -! 


rby te 


equ 


base+3 


reset 


equ 


tase+7 


dsta t 


equ 


base 


ilow 


eou 


base +1 


inign 


equ 


base+E 




cseg 
o r? 


ccpof f s et 


ccp : 


org 


bi os_code 



^S^C^C5J:^C3?3^^C 

5 JC ^ 

;? BIOS Junp Vector for Individual Routines v 

v =? 

5£5£5£i£5£:£ J£3£3p 5£5£5£ 5* ^5£5£5£5p 3£J£5;5 5? 5J5 5£ 



jnp INIT 
jnp WBOOT 
jnp CONST 
jnt> CONIN 
jnn CONOUT 
Itid LISTOUT 
j-np PUNCH 
jnp READER 
jnp HOME 
J m p SELDSK 
j-np SETTER 
jnp SETSEC 
jnp SETPMA 
jnp READ 
jnp WRITE 
jnp LISTST 



; Enter fron BOOT ROM or LOADER 
{Arrive nere from BDOS call z 
{return console keyboard status 
{return console Key boa ri cnar 
{write cnar to console device 
{write cnaracter to list device 
Jwrite cnaracter to punen device 
{return cnar fron reader device 
{.nove to tri ZZ on cur sel drive 
{select disi for next ri/write 
{set traci for next rd/write 
{set sector for next rd/write 
{set offset for user buff (DMA) 
{read a lEb byte sector 
{write a 1ES byte sector 
{return list status 
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jmp SECTRAN 
j 7i d SETDMAB 
j ti d GETS EGT 
j 7i p GETIOBF 
j ti p SSTIOBF 



Jxiate logical->pnysical sector 
Jset s ez base for Duff (DMA) 
Jreturn offset of v em Dese Table 
Jreturn 1/3 map byte (I03TTE) 

5 set I/O Tiap byte (IOBYTE) 



*i» v 

* IN1T Entry Point, Differs for LD3I0S and * 

* BIOS, according to "Loaier_3i os" value * 

bjf J[t JJS ?Jt JJC JJS ^ Xji 3JS SJC 2JC JjJ »fl djf J? »JC JJC *r ^ ^ V 3JC «y* fJC JJt ^jZ Jj£ ZjC Xfi 



I M I T : J print signon .message and. initialize Hardware 

mov ax,cs Jwe entered witfc a JMPF so use 

mov ss.ax JCS: as tne initial value of SS 

mcv ds , ax JDS:, 

mov es,ax Jand ES : 

J use local stacK during initialization 
mov sp, offset stJcoase 

cld Jset forward direction 



IF not loader bios 



i 

; Tnis is a BIOS for tne CPM.SYS file. 
J Setup all interrupt vectors in low 
J memory to aliress trap 



pusn ds jsave tne DS register 

mov IOBYTE ,0 Jclear IOBYTS 

mov ax,0 
mov ds,ax 

mov es,ax Jset SS and DS to zero 

J setup interrupt 'Z to address trap routine 
mov i ntO_of f se t , of f se t int_trap 
mov int0_segment ,CS 
mov di , 4 

mov si,0 Jtnen propagate 

mov cx,510 Jtrap vector to 

rep movs ax, ax Jail 256 interrupts 

JBDOS offset to proper interrupt 

mov bdos_of f set , bdos_of s t 

pop ds Jrestore tne DS register 

(additional CP/M-S5 initialization) 

i i 

i i 



SNDIF ,*not loader_oios 
IF loaner bios 
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• I 
f I 



. I 
f I 



\ 

I 



; Tni s is a BIOS for tne LOADER 
pusn is jsave data segment 



mov ax,C 

mov ds,ax Jpoint to segment zero 

; BDDS interrupt offset 
mov bdos_offset ,bios_ofst 

mov bdos_segmen t ,CS fbdos interrupt segment 
(additional LOADER initialization) 
ooo ds ^restore data see^ent 

I 

1 



ENDIF ^loader bios 



mov ox, off set 
call pms? 
mov ci , fcJ 
jup cep 



s ignon 

»* print sienon message 
;default to ur a: on coidstart 
Jjump to cold start entry of CCP 



VBOOT: jmp ccp+6 



Jdirect entry to CCP at command level 



IF 



not loader Dies 



Jblocic interrupts 



i 
i 

int_irap: 

cli 
mov ax,cs 

mov ds,ax Jget our data segment 

mov bx, offset int_trp 
call pmsg 

nit Jnardstop 

• i 
> i 



ENDIF 



;not loader bios 



5,5 V *|» *|» 3(» 5JC 5|S 5,5 *i» 5JC 5j% 5JS 5,5 5,5 5,5 *j« 5,5 5,5 *,! * ( » 5,5 5,5 5,5 5,5 5,5 5,5 5,5 ifi 5,5 5,5 5,5 5,5 5,5 5^5 5,5 5,5 5,5 5,5 5,5 5,5 5,5 5,5 

* CP/M Character 1/C Interface Routines 515 

v '!» 

- console is US ART (i»2blA) on iSrC 6612 -~ 

* at ports DB/DA 

i if/Z ^ Z £|5 #|C #|C #|% ifi ^ i|% #|5 ^ 



CONST: » console status 

in ai ,csts 
and al,2 
jz const_ret 

or al,2bb freturn non-zero if raa 

cons t_re t : 

ret Jrcvr data available 
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COM IN 



f console input 



call CONST 

jz CON IN ; w a i t for RDA 

in a l , cda ta 

and al,7fn fread data S. renove parity nit 

re t 



CONOUT: 



fconsoie output 



in a 1 , c s t s 
and a i , 1 
jz CONOUT 
mov al , cl 
cut cdata.al 
ret 



feet console 

ftransmi tter 
> tnen return 



status 



buffer is empt y 
data 



LISTOUT: 



ret 



fiist device output 
»not implemented 



LISTST: 



ret 



jpcii list status 
Jnot implemented 



PUNCH: 



fwrite puncn device 

fnot implemented 



READER : 



; return eof for now 



mov al,lan 
ret 

OETIOEF: 

W AL.tJ 
ret 

SETIORF: 

ret 

; Routine to get and ec 

> and sni ft it to 

uconectio : 

call CONIN 
pusn ax 
mov cl,ai 
call CONOUT 
pop ax 
cmp al, 'a' 
j b u ret 
cmp al , ' i ' 
ja uret 



; IOBTTE not implemented 

fiobyte not implemented 

no a console cna ranter 
upper case 

f?e t a console cnaracter 
fsave and 
fecno to console 
fless tnan 'a' is ok 
fgreater tnan ' z' is ok 
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uret 



sub al , 



{else s.nirt to caps 



- a 



ret 

d.ts? : 

Tiov al , [EX J 
test al ,ai 
jz return 
mov CL,AL 
call CONOUT 
i nc £X 
jmps pms? 



{get next cnar from message 
; i r zero return 
Sprint it 

{next cnaracter ana loop 



1 *,» »(» *,* *|» <|»«|% *|» »,» »|» *|» S,t •(% J(J >|% «,% J,» *”,% *|» r,t «,» «,! #|» > 1 * • 



5:1 List Input/Output Routines * 



SELDSK : 




; select 


diet £iven 


ty register CL 


ai isles 


equ 


2 {number of lists 


(up to 15) 




HQ V 


list, cl 


{save list 


number 




mov 


bz , OOOOn 


{ready for 


error return 




emp 


cl , nlisss 


{n beyond max distsV 




jnfc 


return 


{return if 


so 




mov 


cn , 0 


{ d o u b i e ( n ) 






mov 


bx , cx 


{ b x = n 






mov 


cl ,4 


{ready for 


*16 




SHI 


rx , cl 


; n = n * 15 






mov 


cx, offset Ipbase 






add 


bx , cx 


Jdptase + r. 


* IS 


return: 


re t 




;ox = .dpn 




H01E : 


{move selected 


list to n o m e 


Dosition (Tract 




mov 


io com,nomcom 






mov 


t rt ,0 








call 


execute 








ret 









SETTRX: {set tract aliress eiven by CL 
mov trie, CL 
re t 



SETSEC: {set sector number siven dv cl 
mov sect, CL 
ret 



S EC TRAN : translate sector CX usini? table at 
mov cn , 0 
mov bx,cx 

TEST D X,00 ; IS THERE A SKBW? 

JZ NO SKEW ;ir NOT, RET 



[DXJ 
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add ox,dx ;add sector to tran tabi a acdress 

tov oi, [ox] ;??t logical sector 

ret 

NO SKEW: 

ADD 2X , 1 
RET 

SETDMA: ; set DMA offset given dv CX 
tiov dma_adr,CX 
ret 



SETDMA3: ;set DMA segment given oy CX 
mov dma_see,CX 
ret 
J 

GSTSEGT: Jreturn audress of pnysical memory taoie 

mov bx, offset see_ table 
ret 



5jc v v »,» Jj* jj? v jj: ifi »i* v v »(• v v V V V v V v «i* v *|i »|» » 

* All di ss I/O narameters are setup: 

* DISK is 

* TRK is 

* SECT is 

* I 0_ADR IS 

* DMA_ADR is 

* READ reads tae 

* address, and tfRITS 

* tne D^A address to 



disx number 
tracx number 
sector number 
THE PHYS A DDR 



(SELDSK) * 
(SSTTRK) * 
( SETS EC) * 
FOR DMA * 



tne DMA 1st offset 
selected sector to tne DMA 5 
writes tne data from ; 
tne selected sector : 









READ: 



mov cl , A 
mov al.disK 
sal al,cl 
or al.rdcode 
mov io_com,al 
jmps execute 



» com bine di sx selection 
fwitn opcode 

Jcreate iopb 



WRITE: 

mov cl, 4 
mov al.distc 
sal ai,cl 

or al.wrcode ;create iopo for write 
mov io com,al 



EXECUTE: 
outer_retry : 
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mov rtr,y_~nt ,max_retries 



retry : 

in al.rtype Jclear controller 

in ai.rbyte ; 

call sendcom 

idle: in a 1 , a sta t ;wait for completion 

and al,4 ; ready 

j z i a l e 

; cnectt i.o. completion ox 

in al,rtype 

; 00 unlinxed i/o complete 01 linked 1/0 comp 

; 10 disX status cnanged 11 (not used) 

; must be a 00 in al 

test ai,i0b , 'ready status cnange? 

JNZ WP.ti AD 7 
OR AL, 0 

jnz werror >some ctner error, retry 

; cnecx i/o error bits 

in a 1 , r by t e 
rcl al,l 

mov err_code ,S0n 

jb wready ;unit not ready 

rcr ai , 1 

mov err_code,al 

and al,0fen »any otner errors? 

jnz werror 

J 

; read or write is oX, ai contains 0 

ret 



wready: ,'not ready, treat as an error for now 
in al, rbyte Jclear result byte 

jmps trycount 



werror: > return naraware malfunction 



trycoun t : 

dec rtry_cnt 
jnz retry 
mov al,err_code 
mov an,0 



mov bx,ax »'mate error code 15 bits 



mov bx , err t bl [SXJ 

call pmse Jprint appropriate message 

in ai,cdata Jflusn usart receiver buffer 

call uconec.no Jreaa uooer case console cnaracter 



cmp al , 'C ' 

je wboot_l Jcancel 
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cmp al , 'R ' 

ie outer retry Jretry 10 more tines 
cmp ai, I 

je z_ret lignore error 

or al,255 jset cole for permanent error 

z ret : ret 



w h 0 0 1 _ 1 : 

jmp /IS OOT 



; can't maice it w/ a snort leap 



Ip JJI 5, J *|J * 1 * 2JS ijt !)• Jj» i|S Sj« «)• i(? « 



% #|C ij* £|C <*|C £|% ^ 



* V 

sendcom sends tne address of tne iopb to 
- tne iS EC 202 - 

J? V 

5JJ ^ JJC 5JC ?jC 7JC 5JC ij£ ?p JJC ^ 5fC Jj5 5JC 7JC Jp JJ% 5JC 3JS )J% JfC rjC SJC #JC 5p 3j£ }Ji 5p JJC 5p ip JjS ?p Jp JJC JjC ip )*p ip 



senlcon : 

MOV CL, 4 
MOV AX,DMA_S5G 
SAL AX, CL 
ADD AX,DMA_ADR 
MOV IO_ADR , AX 
MOV CL , 4 
MOV AX,CS 
SAL AX, CL 

ADD AX, OFFSET CHAN CM D 
out ilow,ai 

MOV cl, 8 

sar ax,''! 
out ini£-n,ai 
re t 



;add ssg s offset for 202 



J? 5 |C 

"• Data Areas v 

IJ 1 IJS JJ! 3 J 5 JJS Jft JJJ 5 JC 7"fi Jp 2 }C ip ip ip !p ip ip ip ip ip ip ip ij( i|t Ip ip IJC ip Ip ijt ip ip Ip Ip IJ» Ip ip Ip ip I]t Ij« Ip Ip 

data offset equ offset s 





dse? 
0 re 


data 


_of f set 


; contiguous wit n 


IOBYTS 


db 


e 






lisle 


lb 


0 


;iisK 


number 


enanemd 


do 


90Q 


Jiopc 


cnannei word 


io_com 


db 


0 






nsec 


1 b 


1 


JnuMber sectors to xfer 


trie 


db 


0 






sec t 


db 


0 


; s ta r t 


sector 



en t 
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IO_ADR 

dma_adr 

dma_se<? 

HOM COM 
RDCODE 
ERR COE 

vac ODE 


EV 
d w 
lw 

SOU 
ECU 
B EB 
ECU 

I F 


Z'Z'IZ H »PRYS AD DR FOR SEC202 \ 

0OBO.n ;E M A air (default) 

0 jDMA Base Segment 

4 

00H 

5 

loaier_cios 


7 

. 1 
1 1 

si^non 

• i 
f i 


d b 
d t 


i 

i 

c r , 1 f , c r , 1 1' 

'CP/iM-Be Version 1 . 0 ' , c r , If ,0 

1 

1 


J - - •— --T 


SNDIF ; ioader_bios 




IF 


not ioader_bios 


9 -- - 

• 1 
9 1 

s ignon 


do 


cr,if,cr,if 




■lb 


'System Generated 05/25/Sl' 


J ! 


a b 


c r , 1 f , 0 

1 

1 


» i “ _r “ -r-r 


ENDIF ; no t loaier_bios 


int_trp 


lb 


cr f if 




a o 


'Interrupt Trap Halt' 




d b 


c r , l f , 0 


errt bl 


1 w 9 


tZ , erl ,e r2 , er3 




lw e r4 , er5 ,e r6 , er7 




dw 9 


r« , er9,erA,erS 




dw e 


rC ,erD ,erE,erF 




aw e 


ria ,er2o ,er40 , erfc'O 


era 


a b 


cr, if, 'Null Error ?v',0 


srl 


db 


cr, If , 'Dele ted Record :'.0 


er2 


db 


cr , if , 'CRC Error : ' , 0 


er3 


db 


cr, If, 'Data Overrun-Unierrun : ' ,0 


er4 


d b 


cr, if, 'Sees Error :',0 


er5 


equ 


erO 


ere 


equ 


e rO 


sr7 


equ 


erO 


erB 


db 


cr , if , 'Andress Error :',0 


eri9 


d b 


cr, If, 'Write Protect : ' , U 


era. 


1 b 


cr,if,'ID CRC Error :',0 


erB 


d b 


cr, if, 'Write Error :',0 


erC 


db 


cr, if , 'Sector Not Found :',0 
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erD 


ey u 


er0 






er2 


db 


cr, if , 'no Andress 


ya rs : ' , 0 




o r F 


do 


cr , if , 'Data Marx 


Error : ' .0 




er!3 


equ 


er3 






er33 


eqU 


er9 






eri0 


equ 


erB 






er90 


d D 


cr , if , "Drive Not 


Ready :',0 




rtry_cnt db 


0 ;dis£ error retry counter 




» 


System Memory Segment 


Ta cl e 




segta bl 


e do 


1 ; 1 segments 








dw 


tpa_se? ; Is t 


s es starts after 


BIOS 




dw 


tpa_len ;and 


extends to 08000 






INCLUDE DOUBLE. LI3 


;read in disk 


definitions 


i o c _ s t X 


rw 


33 >* local stacK 


for initialization 


s t*c base 


equ 


offset 3 






1 a s t o f f 


eau 


offset $ 






t pa_s eg 


equ 


(lastof f +04:00n + lp 


) / 18 




tpa_ien 


equ 


UF00n - tpa_seg 







d b 'D 



>fili last address for C-ENCN1D 



* 'I* *>* 



• • V# ♦ # * « V# %■# %*# v 

#1% #)% #1 



> ■ 

; - 
; * 

• ;,: v v ^i» v v n» n* * 

dsee 
o rg 

int2_of f set 
intU segment 



Dummy Data Section 



: V¥i 

a 

0 

rw 

rw 



^absolute low memory 
; ( interrupt vectors ) 
1 
1 



oad to system call vector 



*w 



3 V ( &dos int-l) 



oios_ot'i'set rw 

bdos segment rw 

END 



1 

1 



rtry_cnt db 0 Jdisic error retry counter 
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APPENDIX C 



ROM bootstrap for CP/M-=6 or ar. iSSC6S/12 
w i t a t a e 

iS.BC 221 A 222 Floppy Dis a Controllers 



Cop.yri?nt (C) 1982,1961 
Dieital Eesearcn, Inc. 
Sox 579, Pacific Grove 
California, 933 52 



% V *l % ^ f 



* V *(• J|C V #|« »|« #|« J|C #|« ?|% #|% #|% #|« #|« # p 



5:5 Tnis is tne .BOOT ROM wnicn is resident 

* in tne 957 monitor. To execute tee boot * 
tne nonitor must oe brougnt on-line and * v 

* then control passed by tne command * 

* "et‘ f d4 : 2" . First, tne ROM moves * 

“• a copy of its data area to RAM at loca- * v 

* ticn 82282E, tnen initializes tne segment-" 

* registers and tne stacs pointer. Tne 
various peripneral interface cnips on tne* 

5:5 SEC 86/12 are initialized. The 6251 * 

* serial interface is configured for a 9522 v ' 

* baud asynchronous terminal, and tne in- 

* terrupt controller is setup for inter- 

* rupts 12H-17H (vectors at 22240K-8025FE ) * 
>? and edge-triggered auto-SOl (end of in- >f 

* terrupt) mode with all interrupt levels * 
r **' masiced-off. Next, tne 221-22)2 Diskette 

v controller is initialized, and tracA O s,t 

* sector 1 is read to determine tne target * 

* paragraph address for LOADER. Finally, ¥ 

* the LOADER on tracs 0 sectors 2-26 and v 

* tracs 1 sectors 1-25 is read into tne 
target adlress. Control tnen transfers 

~ to LOADER. ROM lf 

rfi 0 contains tne even memory locations, and* 
v ROM l contains the odd addresses. SOOT v 

* ROM uses RAM between 22222H and 222FFK ** 

5:4 (absolute) for a scratcn area, aions with* 
"* tne sector l buffer. v 

V j? sp sp ^ Sfi S? sp V V 5? Zf V V =* ^ Jp 5? =? S? & f V & ** W 5? & *5 & V 3* 



cr 

If 



disic ports and commands 



e^u lb 

equ 18 
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base 




equ 


07Bn 




rtype 




equ 


base^l 




r byte 




equ 


base+3 




reset 




equ 


base+7 




9 

Is ta t 




equ 


base 




i lo w 




equ 


base+1 




inign 

• 




equ 


base J -‘2 




f 

J actual 


console baud 


rate 




baud rate 


equ 


9600 




lvalue 


for 3253 baud 


counter 




baud 




equ 


76B/(baud_rate/100) 


9 

cst s 




euu 


0DAn 


J l 3251 status port 


cia ta 




equ 


0DSn 


J " data port 


9 

ten 0 




equ 


0E0n 


J 3263 PIC cnannel 0 port 


tcnl 




equ 


tcn0+2 


; cn 1 port 


tcfi2 




equ 


tc n0+4 


Jen 2 port 


tend 

• 




equ 


tcn0+6 


J9253 command port 


icpl 




equ 


0 czn 


J 8259a port 0 


icp2 

• 




equ 


0C2n 


>8259a port 1 


> 

secsec 

• 




eau 


ZcBn 


Joffset for trac'i 1 


» 

ROMSEG 

9 




3CU 


0FFD4H 




9 

J 


CSS? 


romsee 




9 

J First , 


move 


our data 


area into 


RAM at 0000:0200 


9 


mo v 


ax , cs 








mov 


ds , ax 


Jdo in t 


DS to CS for source 




mev 


SI , drombegi n 


♦start of data 




mov 


DI , off set 


ram_s tart 


Joffset of destination 




mov 


ax , 0 








mov 


es , ax 


destination segment is 0000 




mov 


CX , da ta_lene-tn 


J now muen to move ir. bytes 






rep movs 


al f ai 


♦move out of eprom a byte 


. 








Jat a time 


9 


mov 


ax , 0 








mov 


ds f ax 


Jdata segment now in RAM 




mov 


ss , ax 








mov 


sp, stac£_ 


offset 


JInitialize stacK segment/ 










J pointer 




cli 






Jclear tne directicr. flag 



1 

i 

; Setup tne 9 259 Programmable Inter rupt Controller 



> 





mo v 


al , 13ft 








out 


i cpi , a 1 


»'9259a 


ICW l c/Bo node 




mov 


al ,10n 








out 


icp2,al 


; 82 59a 


I C W 2 vector l a 40-5F 




mo v 


al , lFn 








out 


icp2, al 


;9259a 


ICW 4 auto 501 master 




mo v 


al , 0FFti 








out 


icp£,al 


J62b9a 


OCW 1 mass ail levels off 


J 

; Reset 


and initialize 


t tie 901/202 DisKette Interface 


f 

res tart 


• 

• 


; also 


come Dae* 


: nere on fatal errors 




i n 


al , rtype 


•clear 


status type reeister 




in a 1 , r by t e 


jclear 


status register 




out 


reset , a i 


.' reset 


diskette system 


nomer : 


mo v 


SI , offset 


borne 






CALL 


execute 


;nome d 


rive 0 


j 


mo v 


bx , OFFS FT 


s ect o rl 


J offset for first sector DMA 




mo v 


ax , bx 


’.enter 


in pa cite t 




mcv 


bx .offset 


rsad0+5 


» 




mo v 


l bxj .al 




» 




i nc 


bx 








mo v 


[bx J , an 




jpacKet now complete 




mov 


bx ♦ offset 


read.0 


» pac.se t location 




call 


execute 




.send pac set 


j 


mov 


es , abs 




.seenent loc for LOADER 




mov 


ax , es 




.must translate to 16 bit ac 




mcv 


ci , 04 




Jaddr for disJtett= controiie 




sal 


ax , cl 








mov 


ex .offset 


readl+b 






mov 


[bx J , al 




Jer.ter in packet 




i n c 


OX 








mov 


[bx J , an 








mov 


tx , of f se t 


readl 




# 


call 


execute 




; read tracts: 0 


1 


mov 


cl , 04 








mov 


ax , es 




; compute offset for trade 1 




aid 


ax , secsec 








sal 


ax , ci 








mov 


bx .offset 


read2+5 






mov 


[bxj ,al 








i nc 


bx 








mov 


[bx J ,an 








mov 


bx .offset 


reaa2 
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> 



call execute 



tracx 2 



nov lea p_se&rren t , es 

; setup car jump vector 
mov leap_off set ,'Z 



; enter LOADER 

j t pt’ dword ptr leap_offsst 

! 

prSi? : 

mo v cl , [EX] 
test cl ,cl 
jz return 
call conout 
i nc EX 
jrp pms? 

> 

conout : 

in a 1 , c s t s 
test al ,1 
jz conout 
mov al , cl 
out c 1 a t a , a 1 
re t 

! 

c o n i n : 

in al.csts 
test al ,2 
jz conin 
in al ,cdata 
and ai,7Fn 
re t 



execute : 
retry: 

in ai.rtype 
in al.royte 
call sendcon 
idle: in ai.dstat 

and al , 4 

jz idle jsystem 

in ai.rtype 
test al,2 
jz intcmp 

jvp 



> retry ir drive not ready 

; clear controller 

• « «• 

5 

,'systen status 

awai ting mterupt 
I cnec£ drive status 



.I/O NOT COMPLETE , TRY AGAIN 
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in temp: in al.rcyte 
ml al , 1 
jae iocmn 
RCR aL,i‘ 
j.mp fatal 
iocmp : rcr al,l 

and ai,efen 
j 2 return 
J*.P RSTRT 



i i c is con’ piste 2 s t status 



; res to re 

j a n v errors V 



fatal: 


nov 


cl , '£ 


; fatal e 


r rcr 


ETEST: 


RCR 


AL, 1 








i nc 


cl 








TEST 


AL ,{?1 








jz - 


test 








mev 


al , cl 








no v 


at, 4: 








adt 


AX , AX 








T 0 V 


ox , ax 


; maice 15 


cits 




rov 


ox,errtDl[EXj 






J 


pri n 


t appropriate 


error message 






call 


pmsg 








call 


^ 0 ni n 


; w a i t for 


xey strife 




pop 


ax 


; di scard 


unused iter 






res tart 


» t r. e a s t a 


rt all c ?, er 


return : 


RET 




; re turn f 


rom EXECUTE 



> 

» 



sendcom: ; routine to send a command string* tc 2yi/2fi 

mov ax , tx 
out i 1 0 w , a 1 
mov cl , es 
sar ax, cl 

out inign.al Jpaciet addr 

ret 



Image of data to ce moved to Ra^ 



IromDeein eau offset $ 

» 
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I 



c real it ri ne 


a o 


80 ft 


{parameter bloc it io 






d b 


4n 


; read function coae 






a b 


1 


; - sectors to read 






db 


2 


> t ra cx # 






d b 


1 


{start witn sector 






d d 


2 


; will contain lower 






db 


C 


{ " " upper 


» 

cread tr'o0 


d b 


80 a 








1 D 


4n 


{ read multiple 






d b 


25 


sectors tc read 






1 D 


0 


{ track 0 






db 


2 


{start witn 2 






1 b 


0 


;aadr for track 0 f 






d c 


0 


! 


» 

crealt rcl 


d b 


80 r. 








1 b 


4 a 








ib 


‘06 


; sectors 






d b 


1 


Itracsc a 






d b 


1 


; start witn sector 






1 b 


0 


{ a d a r 1 s b 






d b 


0 


; aadr ns c 


> 

cnomee 




db 


Be ft 








Di3 


03 E 








a b 


0 








i b 


0 








db 


0 








d b 


0 








1 b 


r* 

4 




f 

cerrt D1 


dw 


offset 


er0 






d W 


offset 


erl 






d w 


offset 


erH 






dw 


offset 


er3 






dw 


offset 


o j*4 






dw 


offset 


ot»K 






dw 


offset 


ero 






dw 


offset 


er7 




» 

Cer0 


db 


cr.lf, 


'Null 


Error Y?',0 


Cerl 


d b 


cr.lf. 


'CRC Error',0 


CerH 


d b 


cr.lf, 


'Sees 


Error , 0 


Cer3 


d b 


cr.lf, 


'Address Error ,0 


Cer4: 


d b 


c r , 1 f » 


'Data 


Overrun-Underrun ' ,0 


Cer5 


db 


cr ,if , 


'Writ e 


Pro te ct ' , 0 


Cerb 


d b 


cr.lf. 


'Write 


Error ' , 0 


Cer7 


db 


cr.lf. 


'Drive 


Not Ready',0 


f 

dromend 


equ 


offset $ 
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» 

data_lengtn aqu 4ro meal -iron oesi n 
5 

; reserve space in RAM for lata area 



; (no rex 


records 


genera t 


ea nere) 


> 

dseg 


0 






o r? 


02d?en 






ran_s tart 


equ 


$ 




raa id? 


r o 


7 


Jread tragic 0 sector l 


readl 


r b 


7 


; real T0 S2-2b 


reacts 


r o 


7 


; reaa T1 Sl-2b 


none 


r b 


7 


jnone drive 0 


errt ol 


rw 


6 




er0 


r b 


iengtn 


cerz ; 1 6 


arl 


r b 


i e n s t n 


cerl 


er2 


r b 


iengtn 


cer2 


er3 


r d 


iengtn 


cer3 


er4 


r b 


iengtn 


cer4: ;i<= 


er5 


r b 


iengtn 


cerb ; 11 


erb 


r d 


iengtn 


cerb ;15 


er7 


r b 


iengtn 


cer7 ;i7 


1 

leap_off set 


rw 


1 




leap_sesment 

f 


rw 


1 




• 

> 


rw 


32 


Jlocal stacK 


s tacK_of f set 


equ 


offset 


5JstacK from nere ao</n 


J 

J 


T£ SI r 


eal in n 


ere 


sec to rl 


equ off 


set s 




I 

Ty 


r b 


l 




Len 


rw 


1 




Ads 


rw 


l 


; A5S is ail we car® aoout 


Min 


rw 


1 




Max 


rv 


1 






end 
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APPENDIX D 



title ' 80 e 6 Diss I/O Drivers' 



% *1* #|% * 



> #1% #|% ^g% ^|« # 



#1% <F|% #|% 4^|% #|« #|^ #0% #|* *|% #|% »!« 

* Basic Input /Output System (BIOS' for * 

* CP/M-85 Configured for iSBC 85/12 with v 

* tne iSPC Hi'’ A Floppy Piss Controller 

v (Note: mis file contains do tn emoeddec 

~ tans and Dianas to minimize tne list file v 

* width for printing purposes. You may visa** 

* to expand tne blantcs Before performing v 

v major edi tins. ) * 

^ V JJC 5(C #J6 JJC ?JS JJC 2JS ?jC Jj! 5JS 5JS JJC *j? )|? Jg* 5|? 5J% JJt #j? 5J% JjS #Js ?j£ TjS r|C Jp 3J% «?JS 7|% J|% JJ> 



Copyright (C) 19S0,iy8i 
Digital Research, Inc. 

3ox 579, Pacific Grove 
California, 93950 

(Permission is nereoy granted to use 
or aostract tne following program in 
the implementation of CP//., MP/M or 
CP/NET for tne 8086 or 8088 Micro- 
process or ) 



true equ -1 

false equ not true 



* Loader _tios is true if assembling tne * 

LOADED. BIOS, ctnerwise BIOS is for tne 

* CPM.SYS file. Blc_list is true if *e ” 

have a serial printer attached to BLC8538 

J! Edos_int is interrupt used for earlier * 

* versions. 5 '* 



#1% #1* ^ # 



> #|» #|% #|% 



ioader_bi os 


equ 


false 


Dlc_ii s t 


equ 


true 


oios_in t 


equ 


22 A Jreserved EDOS Interrupt 


IF 


not 


loader Dios 



! i i 

i \ i 
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bios_code 
ccp_of fset 
bios_of s t 

f 1 


eau 

3 q U 

equ 


25 yen 
e e k e n 

ysosn jbdos 


entry point 

! 


Em El F 


; not 


loader_cios 




IF 


1 os4er_oios 




J ■" — • - — - 

. i 

• i 

bios_code 
ccp_o ffse t 

bios o f s t 

• 1 
f | 


equ 

ecu 

squ 


I 

I200r. ; s tar t or 1 LD3ICS 
eee 3n ;oase or c pm loader 
0406r. ; stripped ECUS entry 

"l 

1 


> 

ENDIF 


; loader_bio s 




cs ts 
caa ta 


equ 

equ 


0 D A tl JiB251 
e D 8 n > 


status pert 
data port 


• 

i— » 


D lC_ 


.lis t 




> 

• i 
> i 

Is ts 
11a ta 
Dic_reset 


equ 

equ 

equ 


1 

1 

41n J2o5l No. 0 on BLC8b38 

«• •• H *» »« 

40 n ; 

sen ; rese t selected US ARTS 



• I I 

> I I 



status port 
lata ocrt 
on ELCBdiSB 



ENDI F ; c lc_Ii s t 



• ?,» v >|« J ( » • 



‘ v v V V v 



V *|% #|% #|% #|% •, 



Intel 1SBC 204 Dis2 Controller Ports 






v 

t 



oase204 


equ 


0a0n 


i'ic_com 


equ 


bas e20 A+0 


f dc_stat 


equ 


oase204+0 


f lc_parm 


equ 


oase204+l 


fdc”rsl t 


equ 


Dase204+1 


i'dc_rst 


equ 


oase204+2 


dmac_ad r 


equ 


base204+4 


dmac_cont 


equ 


Dase204+5 


dmac_scan 


equ 


Dase204+S 


dmac_sadr 


equ 


Dase204+7 


dmac_mo de 


equ 


Dase204+b 


dmac_stat 


equ 


Das e204+8 


fdc_sel 


equ 


Dase204+9 


t'lc_se£ , ment 


equ 


cas e204+l0 



S BC204 assigned address 



; 8271 


FDC 


out command 


;8271 


in 


status 


J 8271 


out 


parameter 


> 827 1 


in 


result 


j 827 1 


out 


reset 


J 8257 


DMA 


base address out 


) 8257 


out 


control 


; 8257 


out 


scan control 


J 8257 


out 


scan address 


i 8257 


out 


mode 


» 8257 


in 


status 


;?dc s 


e 1 e 


-'t port (not used) 


» segment 


address register 
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equ Das e2(44:+l 5 jreset entire interface 



rese t_2i)4 

max_ret ries 

or 

If 

cseg 
o re 

ccp : 

org 



eau 10 



equ 8dn 
equ fef a fi 



ccpoff set 
Dios coae 



•max retries on aisK i/o 
; oef ore perm error 
Jcarriage return 
Jiine feel 






v BIOS Jump Vector for Indiviauai Routines v 

^ ^ ^ v v ^ V V v o* v 



j-np INIT 
jnp WJjOOT 
jnp CONST 
jmp CONIN 
jnp CONOUT 
jnp LISTOUT 
jnp PUNCH 
jnp READER 
jnp HOME 
jnp SELDSS 
jnp SETTEE 
jnp SETSEC 
jnp SSTDMA 
jno READ 
jnp WRITE 
jnp LISTST 
jnp SECTRAN 
jnp SETDMAB 
jnD GETS EOT 
jnp GETlOBF 
jnp SETIOBE 



; Enter from BOOT ROM or LOADER 
JArnve nere from BDCS call e 
Jreturn console Keyboard status 
Jreturn console Keyboard cnar 
J w ri te cnar to console aevice 
Jwrite cnaracter to list device 
Jwrite cnaracter to puncn device 
Jreturn cnar from reader device 
Jnove to trK 80 on cur sei drive 
Jselect lisi for next rl/write 
Jset tractc for next rn/write 
Jset sector for next rd/write 
Jset offset for user Duff (DMA) 
Jread a 128 cyte sector 
Jwrite a 128 byte sector 
Jreturn list status 
Jxiate iogicai->pnysicai sector 
Jset seg case for ouff (DMA) 
Jreturn offset of Men Desc Table 
Jreturn I/O map Dvte (IOiYTE) 
Jset I/O nap byte (IOBTTE) 



*5 






* INIT Entry Point, Differs for LDBIOS and sfi 

* BIOS, according to ” Loader_Bi os ” value v 



v v ' 



#|% » ( « 



INIT : 



Jprint si 
nov ax.cs 
mov ss,ax 
nov ds,ax 



?non message ana initialize nardware 
Jwe entered wit.a a JM?F so use 
J CS: as tfte initial value of SS 

J DS : , 
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> 

* 



mov es,ax ; and ES : 

> use local stacs durinv initialization 
mov sp, offset stioase 

cld net forward direction 

IF not loader Dios 



I I 

I I 

; Tnis is a BIOS for tne CPiY.SYS file. 
; Setup all interrupt vectors in low 
; Terror/ to address trap 



pusn 


IS 


isave tne OS register 


no v 


ax , k' 




mo v 


ds . ax 




710V 


es , ax 


Jset ES anc OS to zero 


> setup interrupt 


k! to address trap rout 


10V 


intO_of f set . 


offset mt_t rap 


10V 


intersegment 


n q 

f \J U 


mo v 


di , 4 




Tiov 


si , k) 


i tnen pro pagate 


iov 


CX , 51 k’ 


; trap vector to 


rep 


rovs ax, ax 


jail* 256 interrupts 



; BOSS offset to proper interrupt 

mov bdos_of f set , Ddos_of s t 

pop ds Jrestore tne DS register 



^ TJX TJX TJX TJX JJC TJX y TJX TJX TJX JjC TJX TJX ijt 5JC JjC Jj% TJX TjX #[> V TJX #p TJX *j% ?J% JJC TJX TJX TJX TJX 

v ; i s 

v National "iLC cP3E” Cr.annel '£ for a serial* 
•“ 960ii naud printer - tnis coarc uses E Sig-* 

* netics 2551 'Jsarts wnicn nave on-cr.ip caud* 

* rate venerators. * 



*(» V *|» *|» »|» v » ( £ «|« »|» »|» *|» •,» 5,5 « t £ 5,5 5,5 5,5 5,5 5,5 5,5 5,5 5,5 5,5 5,5 5,5 » f 5 5,5 5,5 5,5 5,5 5,5 5,5 5,5 5,5 5,5 «,5 5,5 5,5 5,5 5,5 



mo v 


al.k’FEn 










out 


Dic_reset ,ai 


* 


reset an usarts 


on E S2E 




TCV 


al , 4:En 










out 


ldata+2 ,al 


;s 


et usart k' in async E oit 


mode 


mo v 


ai , 3En 










out 


lna ta+2 ,al 


;s 


et usart 0 to 9600 Dauc 




mov 


ai . 2?.n 










out 


icata- i -3 ,ai 


;e 


name Tx/Rx , and 


set up R 


TS , OTR 



• I I 

> ! 



f 


SNDIF 


; not loader_Dios 






IF 


I oaler_Di os 





I 



• I 

* I 



iVfcOOT 



JTnis is a BIOS for tne LOADER 
pus.n is ; s a ve lata seener.t 

•no v as , <£ 

j 1 c v os.as ; point to segment zero 

! RDOS interrupt offset 
nov bio s_of f set , bio s_of st 

tov bios_segment ,CS bios interrupt segment 



» I 



7 I 
7 “ 



pop 


is 


^restore lata 


segment 

i 


ENDI 


F ; i oaier_bio s 




no v 


bs, offset 


signon 




cai i 


pms? 


; print signon 


message 


mo v 


ci , 'i 


i default to ir 


A: on coiistart 


W 


CCD 


Jjump to coli 


start entry of CCP 


jmp 


ccp+5 


Jiirect entry 


to CC? at command level 


IF 


not ioader_Dios 




): 

cl i 




1 

1 

; b i o c £ interrupts 


nov 


as , cs 






no v 


is , as 


iget our lata 


segrne nt 


nov 


bs, offset 


int_trp 




call 


pmsg 






nil 




; .nans top 


\ 

\ 


ENDI 


F ;not 


loaaer Dios 





5,5 5|5 5,5 5,5 5,5 5,5 5,5 5,5 5^5 5,5 5,5 5,5 5,5 5,5 5^5 5,5 5,5 5,5 5,5 5,5 5,5 5,5 5,5 5,5 5,5 5,5 5,5 5,5 5,5 5,5 5^5 } 



V v 

* CP/M Cnaracter I/O Interface Routines "• 
v Console is Usart (i£251a) on iSBC Bo/lZ 

* at ports D£/DA * 



: 5 ? v 



v v *i' v v w '»• *»» *r 



• V v v W v 



f|% ^ «|*» «|% r|% 



5,5 5,5 5,5 5,5 



V V »i* »t' 'i» 



CONST 



const 



; console status 
in ai , csts 
ani al , 2 
jz const_ret 

or ai,25P ^return non-zero if REA 

re t : 

ret ^Receiver Data Available 



CON IN : 

call const 



jconsole input 



£b 



jz COMM 
in ai.caata 
am a 1 , 7f n 
ret 



;*ait for R£A 

Jread data and rerove parity cit 



CONOUT: 


> c o n s o 1 e 


output 




in al ,csts 
and al , 1 


J 2 et console status 




jz CONOUT 
mov a l , c 1 


fwait for T£E 




out caata,al 


^Transmitter Buffer Empty 




ret 


Jtnen return data 


LIST0U7 


« 

• 


; lis t device output 




IF olc_lis t 




J 

• 1 
> l 


call LISTST 
jz LISTOUT 
mov a 1 , c 1 


i 

i 

jwait for printer not busy 


• 1 
f l 


out ldata,al 


fsend cnar to TI 810 

1 

1 


f 


ENPIF ; olc_list 




ret 




LISTST: 




Jpcil list status 




IF blc_lis t 




f " 

• I 
f 1 


in a 1 , 1 st s 
and ai,8in 
cmp al,8ln 


i 

i 

fiooic at Dotn TxRDf and DTP 




jnz zero ret 


Jeit.ner false, printer is busy 


• 1 

f I 

1 ’ 


or a l f 255 


Jbotn true, LPT’is ready 

i 

1 



PUNCH: 

READER 



GETIOBF : 



ENBIF ; Dlc_ii st 
re t 

>not implemented in tnis configuration 



mov ai.lan 
re t 



mov a 1 , 0 



jreturn EOF for now 
; T T Y : for consistency 



85 



ret 



JIOEITS not implemented 



SSTIOBB 



re t 



Jiobyte not implemented 



zero_re t : 

and al,i! 

ret Jrsturn zero in AL and flags 

f Routine to get and ecno a console cnaracter 
; and snift it to upper case 



uconecno : 

call CONI N 
pusn ax 
mo v cl , al 
call CONOfJT 
pop ax 
cmp al , 'a ' 
j b uret 
cmp al,'z' 
ja uret 

sub ai, 'a '-'a ' 

ure t : 

ret 



;ge t a console cnaracter 

;save and 

iecno to console 

Jiess tnan 'a' is ok 

greater tnan ' z' is os 
> el se sni f t to caps 



utility subroutine to print messages 



pmsg: 



mov al , [BX] 
test al ,ai 
jz return 
mov CL,AL 
call CONOUr 
inc BX 
jmps pms? 



>^et next cnar from message 
; if zero return 
Jprint it 

jnext cnaracter and loop 






Bisfc Input/Output Routines 



;,s V "fi s? f,6 if. if. ^ f,C 



» V V V V 






SELDSX: 


; s e l e c t 


di s£ 


£ri ven 


by register CL 


mov 


bx , oooon 








cmp 


cl ,2 


; t n i s 


BIOS 


only supports 2 disxs 


jn b 


return 


i return */ 


0000 in BX if tad drive 


mov 


al, 3 on 








cmp 


cl ,0 








jne 


sell 


; d r i v e 1 if 


not zero 


mov 


al, 40n 


; e 1 se 


drive 


is 0 
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tl Xi 



sell: mov sel_masi,al Jsave drive select masi 

Jnow, we neea nisi paraneter acdress 

mov cn,0 

mov bx,cx JBX = won(CL) 

■no v cl , 4 

sni bx,cl Multiply cnve code *•' 18 

* ''reate offset from Disi Parameter Base 
add cx, offset cp_oase 

return : 

ret 



HOME : 



Jmove selected list to norne position (Traci Z) 
mov trt,0 Jset disi i/o to traci zero 

mov bx, offset r.om_com 
call execute 



jz return 
mov bx, offset 
call pmsff 
jmps nome 



J nome drive and return if OK 
bai^nom Jelse print 
J~Home Error" 

Jand retry 



SSTTRK: 


Jset traci 


address 


si ven 




mov trie, cl 


jwe 


only 




ret 






SETS EC: 


J set sect or 


num ber 


?i ven 




mov sect, cl 


OJ 

• » 


only 




ret 







by CX 

use 9 bits of traci acdress 



cy cx 

use 9 cits of sector address 



SECTRAN: ; translate 
mov ox , cx 
add bx,dx 
mov bl , [dxJ 
re t 



sector CX usinr table at [DXJ 

Jadd sector to tran table address 
Jset logical sector 



SSTDMA: Jset DMA offset siven by CX 
mov cma_adr,CX 
ret 



S3TDMA3: Jset DIMA segment ?i ven oy CX 
mov dma_see,CX 
ret 

! 

GETSEGT: Jreturn address of physical memory table 

mov bx, offset se^_ table 
ret 



* All disi I/O parameters are setup: tne * 

* Read and ^rite entry points transfer one * 

* sector of 129 bytes to/from tne current * 
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* DMA address using tne current dis£ drive v 

v *i* **• 9 v '? *1* t* v v *i' *** ^i* *i* v v v *r 'i* nr* n* V nr* ^ **,* n» *? v *{* JJ» *jc 5JC 5}S *j» fj» 9|$ ?J5 JJ» Zfi J,c Jii 



READ : 


nov 


ai , I2n 


; basic 


read sector command 




JTipS 


r_w_c ommon 






.yRITfi: 


mov 


al , ean 


» oas ic 


write sector command 



r - W - C0T!T, ° ^ : 

rov bx , offset io_coin ;point to command strin 
mov byte Dtr l[£XJ,al ;put command into stri 
; fail into execute and return 

execute: ^execute command striae. 

; [3ZJ points to lengtn, 

»' followed by Command byte, 

; followed by ienetn-1 parameter bytes 

mov last_com,3X Jsave command address for retries 
outer_retr.y : 

>allow some retrying 
mov rtry_cnt ,max_re tries 

retry: 

mov L'X , las t_com 

call send_com ^transmit command to i827l 
; cbecic status poll 

mov LX , iast_com 
mov al , 1 [ox J 
mov 

cmp al,2cn 
jb exec_poli 
mov cx,8t'6fc’n 
and al,0fn 
cmp al,0ch 
mov al,C 
ja exec_exit 

e xec_po 1 1 : 

in ai,fdc_stat 
and al,cn 
tor ai.cl 
jz exec_poii 



in al,fdc_rslt 
and ai.ien 



,*ge t command op code it 

JmasK if it will be " int re a" 

fox if it is an interrupt type_. 
Jelse we use "not command busy" 

; unless tne re isn't 

> any result 
ipoil for bits in CH , 

; toeeled *itn bits in CL 

Jread status 

> isolate wnat we want to poll 
»’ a n d loop until ic is done 

JOperatlon complete, 

] see if result cole indie 
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ates error 






ar_rdv : 



jz exec_exit 

emp a i , 1 2* n 
je dr_nrly 

; men we just 
dec rtry_cnt 
Jnz retry 

retries do not 
ran error 



;r.c error, trer exit 

♦some type of error occurred . . . 

!was it a not ready drive ? 

♦ no , 

retry real or write 

♦ up to lii times 
recover fro^ tne 



exec 



m o v a r , t.' 

mov ox , ax ;,maice error coae 16 cits 

mov bx,errtbi[2XJ 



call pmse 



exi t : 
ret 



♦ orm t 



in ai.cdata 


♦ f i u s n 


call uconecno 
emp al , 'C ' 


Jreaa u 


je wboot_l 
emp ai , ' 


; cancel 


je outer retry 
emp ai, I 


5 retry 


je z_ret 


; ignore 


or al,255 


;set co 



appropriate ressa*? Q 
usart receiver buffer 



more times 



error 



for osrmanent error 



lr_nrd.y: ;rere to wait for drive ready 

call test_realv 

jnz retry Jif it's ready now are dene 

call test_reaiy 

jnz retry Jif not ready twice in "ow, 

mov ox, offset nrdymsg 

call pmssr ♦'"Drive Not Ready” 

nrdytfl : 

call test_ready 
jz nrdytfl 
jmps retry 

zret : 

and a 1,0 
ret 

wboo t_l : 

jmp WBOOT 



♦now loop until drive ready 
;tnen so retry witnout decrement 

♦return witn no error code 
ican't maffe it w/ a snort leap 



5J5 JjS <J5 SjC JJC JJS « 



C i ffC i|4 rp rp #JC ip ?p 3{2 ip ip ip ip ip ip ip ip ip ip ip ij« 



-r* 



Tne iB271 reauires a read status command * 
to reset a drive-no t-ready after tne * 
drive oe comes ready 



»* 



* 



# i"» *p v* t or* 



JjC r t i 2{C *fZ JJC #JC 5p JJC 3|C ?jS 2X 2yC ?(C 5JC # ( « # 



tes t_reaay : 

mov dn, 4£n ^proper mas* ir ir l 

test sei_mas£,Stfn 
jnz nrly2 

■nov dn, B4d ; r* a s ic for dr i) status bit 

nriv2 : 



dr_po 11 



mcv ox, offset rds_ccm 
call send com 



in al,fdc_stat 
test al 
jnz dr_poll 
in al,fdc_rslt 
test al ,4ft 
ret 



Jget status word 

,'wait for not command cusy 
iget "special result" 

Uook at oit for tnis drive 
•return status of ready 



JJS V V V ¥ *(» V 9 V 2jS V V «|« 7fZ JJC v •)« f(* }|t «)« £JC »(« JJ5 5^» J|* JgS •)« Jp 9 ^ SJS *|J C,« •)> J,S Jj« »jC J,C r ( « 5j» *|» 

=5= Send_com sends a command and uarameters * 

* to tne i82?l: 31 addresses parameters. v 

* Tne DMA controller is also initialized * 

* if tnis is a read or write v 

Xfi v 

* Xfi Xt 3P 3P SfC 2JC a? Tfi * * * * JJC JJS 3* S? J* 3? 3? 3? 3JC 3* 5? 3 JS 3? 3* 3? 3* 7? 3* 3* >jC 3£ 5,5 3£ 3* 3£ 3JC 5? ^ 3? ^ 



send_com : 

in ai,fdc_stat 

test al,SKn Jinsure command not busy 

jnz send_com »loop until ready 



; see if we nave 



to initialize for a DMA operation 



mo v al , 1 [bxj 
cmp al , I2n 
j ne wri te _maybe 
mov cl ,48n 
jmps init_ima 
writ e_may be : 

cmp al,fcjan 
jne dma_exit 
mov cl,8£n 
ini t_ama: 



• get command byte 

• if not a read it could be writ® 
iis a read command, go set DMA 

•leave DMA alone if not read or w 
Jwe nave write, not read 



te 



; we nave a read or write operation, 

»' (CL contains proper directic 

mov al,04n 

out dmac_mode,ai fenaoie 

mov al , 8fc) 

out dmac ccnt,al Jsend fi 



setup DMA controller 
n bit' 



dmac 

rst oyte to control port 
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mov 


al , cl 










out 


dnac_cont ,al 


> load 


dire 


c 1 1 o n re 


gister 


mov 


ax , d.ma_adr 










out 


dmac_air ,al 


> s end 


lew 


oyte of 


D V1 A 


mov 


al , an 










out 


dmac_anr ,a 1 


; send 


nign 


byte 




mov 


ax , dma_se? 










out 


fdc_segment ,ai 


fsend 


low 


Oyte of 


segmen t 


mov 


al , an 










out 


fic segment ,al 


; tr.en 


nien 


segment 


address 



dna_exi t : 

mov cl , [3 X J 
i nc El 
no v al t [3X J 
or al,sei_mask: 
out fdc_com,al 
parn_loop : 

dec ci 

jz sxecjexit 
Inc El 
parn_poll : 

ir. al,fdc_stat 
test al ,2Kn 
jnz parm_poll 
mov al , l£X J 
out fdc_parm,al Jsend next parameter 
jmps parm_loop »g o see if tnere are more parameters 



;get count 
;get command 

jmerge command and drive cone 
»send command oyte 

;no (more) parameters, return 
Jpoint to (next) oarameter 



Jtest "parameter register full" Sit 
Jidle until parm reg not full 



* JS 

; Data Areas v 

; v ^ 

data _off set eau offset $ 





d s 0 ? 
o rg 

IF 


data_offset jcor.tiguous witn 

1 oader_oi cs 


i 

J 1 

sienon 


db 


1 

cr,lf t cr,if 


> ! 


dfc 


'CP/^-c6 Version 2 .2 ' , cr , If ,0 

t 

! 




ENDIF 


» loader_oios 




IF 


not loader_Dios 


J “ 

j j 

s ignon 


d d 


! 

cr,lf,cr,lf 
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• 1 
’ 1 
• . 


d d 


System Generated - 11 Jan 81 

1 

1 




ENDIF Jnct loader_oios 


bad_nom 


db 


cr, If, 'Home Erro r ' , c r , if , 0 


int_trp 


db 


cr , if , 'Interrupt Trap Halt',cr,l 


errt bl 


dw 


e r'0 ♦ erl ,er2 , er3 




dw 


e r4 , er5 , e r5 , er? 




dw 


e r9 , er9 ,erA , erS 




dw 


e rC ♦ erD ,erE , erF 


er0 


db 


cr, if, 'Null Error ??',0 


erl 


equ 


er0 


er2 


equ 


er0 


er3 


equ 


e r0 


er4 


db 


cr, If , 'ClocK Error :',0 


erb 


db 


cr, if , 'Late D'lA : ',0 


erS 


d b 


cr,lf,'ID CRC Error : ' , 0 


er? 


1 b 


cr, If, 'Data CRC Error :',0 


P 


db 


cr, if, 'Drive Not Ready 


er9 


db 


cr, if, 'Write Protect :',0 


erA. 


db 


cr, if, 'Trie 00 Not Found :',0 


erS 


db 


cr, if, 'Write Fault :',0 


erC 


d b 


cr , if , 'Sector Not Found :',0 


erD 


eau 


er0 


erE 


equ 


er0 


erF 


eau 


er0 


nrdymsg 


equ 


O I'M 


rtry_cn t 


db 


0 Jdis£ error retry counter 


las t_com 


t dw 


0 Jaidress of last command string 


dma_adr 


dw 


0 jdma offset stored nere 


dma_seg 


dw 


0 Jdma segment stored nere 


s el "mass 


d b 


42 h J select mass, 40 n or 90 n 



Various command strings for 13271 



io_co:n db 3 

rl_wr db 0 

trie db 0 

sect db 0 



; lengtb. 

,* real/write function code 
Jtracic # 
isector » 



nom_com db 2,29n,0 jnome drive command 

rds_com db l,2cn Jread status command 



y System Memory Segment Table 



segtable db 2 ;2 segments 

dw tpa_se<? Jlst ses starts after BIOS 



c r , i f , 0 



0 
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dw tpa_ien ;and extends to 0 b 001 

dw 2000n Jsecond is 20000 - 

iw 2 0 0 0 n J3FFFF (l2fctc' 

include singles. lie ;read in disK definitions 

1 0 c _s t k rw 32 Jiocal stacK for initialization 
stKDase equ offset $ 

lastoff equ offset s 

toa_se^ eau ( last of f +0400n + 15 ) / lb 

tpa_len equ 0800a - tpa_ses- 

db 0 ; fill last address for S3NCMD 



3? « 

8:5 Dummy Data Section 

* v 



7£ 7 $ JS ap V V V V & V V 3f 5S =p ip 5? V sp 3 r ’F ’r Jp ap *r V >P 3 s V ap >p ap V ap V h~ 5* ap ap ap ap ap 



dseg 
o r? 

int0_of f set 
int2_segment 
> pad 

rw 



0 ^absolute low memory 

0 ; (interrupt vectors) 

rw l 

rw 1 

to system call vector 
2*( bdos_int-l ) 



bdos_offset rw 1 

bios_se?ment rw l 

END 
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